aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--arabluatex.lua8
1 files changed, 4 insertions, 4 deletions
diff --git a/arabluatex.lua b/arabluatex.lua
index 4c2fac5..c0e0232 100644
--- a/arabluatex.lua
+++ b/arabluatex.lua
@@ -550,11 +550,11 @@ function cap(str)
550 return string.format("%s", body) 550 return string.format("%s", body)
551 end) 551 end)
552 if string.find(str, "[^\\]%-['`ʾʿ]") then 552 if string.find(str, "[^\\]%-['`ʾʿ]") then
553 str = string.gsub(str, "(%-['`])", "%1\\MakeUppercase ") 553 str = string.gsub(str, "([^\\]%-['`])", "%1\\MakeUppercase ")
554 str = string.gsub(str, "(%-ʿ)", "%1\\MakeUppercase ") 554 str = string.gsub(str, "([^\\]%-ʿ)", "%1\\MakeUppercase ")
555 str = string.gsub(str, "(%-ʾ)", "%1\\MakeUppercase ") 555 str = string.gsub(str, "([^\\]%-ʾ)", "%1\\MakeUppercase ")
556 elseif string.find(str, "[^\\]%-[^'`ʾʿ]") then 556 elseif string.find(str, "[^\\]%-[^'`ʾʿ]") then
557 str = string.gsub(str, "(%-)", "%1\\MakeUppercase ") 557 str = string.gsub(str, "([^\\]%-)", "%1\\MakeUppercase ")
558 elseif string.find(str, "^['`ʾʿ]") then 558 elseif string.find(str, "^['`ʾʿ]") then
559 str = string.gsub(str, "^(['`])", "%1\\MakeUppercase ") 559 str = string.gsub(str, "^(['`])", "%1\\MakeUppercase ")
560 str = string.gsub(str, "^(ʿ)", "%1\\MakeUppercase ") 560 str = string.gsub(str, "^(ʿ)", "%1\\MakeUppercase ")