aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--arabluatex.lua4
1 files changed, 2 insertions, 2 deletions
diff --git a/arabluatex.lua b/arabluatex.lua
index 435fe83..4c2fac5 100644
--- a/arabluatex.lua
+++ b/arabluatex.lua
@@ -549,11 +549,11 @@ function cap(str)
549 body = string.sub(body, 2, -2) 549 body = string.sub(body, 2, -2)
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 ")