diff options
Diffstat (limited to 'Master/texmf-dist/tex/lualatex/arabluatex/arabluatex.lua')
-rw-r--r-- | Master/texmf-dist/tex/lualatex/arabluatex/arabluatex.lua | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex.lua b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex.lua index b21ee63dee8..c0e02324e07 100644 --- a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex.lua +++ b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex.lua @@ -129,6 +129,7 @@ local function takeoutcapetc(str) return string.format("%s", body) end) str = string.gsub(str, "\\linebreak", "") + str = string.gsub(str, "\\%-", "") return str end @@ -548,12 +549,12 @@ function cap(str) body = string.sub(body, 2, -2) return string.format("%s", body) end) - if string.find(str, "%-['`ʾʿ]") then - str = string.gsub(str, "(%-['`])", "%1\\MakeUppercase ") - str = string.gsub(str, "(%-ʿ)", "%1\\MakeUppercase ") - str = string.gsub(str, "(%-ʾ)", "%1\\MakeUppercase ") - elseif string.find(str, "%-[^'`ʾʿ]") then - str = string.gsub(str, "(%-)", "%1\\MakeUppercase ") + if string.find(str, "[^\\]%-['`ʾʿ]") then + str = string.gsub(str, "([^\\]%-['`])", "%1\\MakeUppercase ") + str = string.gsub(str, "([^\\]%-ʿ)", "%1\\MakeUppercase ") + str = string.gsub(str, "([^\\]%-ʾ)", "%1\\MakeUppercase ") + elseif string.find(str, "[^\\]%-[^'`ʾʿ]") then + str = string.gsub(str, "([^\\]%-)", "%1\\MakeUppercase ") elseif string.find(str, "^['`ʾʿ]") then str = string.gsub(str, "^(['`])", "%1\\MakeUppercase ") str = string.gsub(str, "^(ʿ)", "%1\\MakeUppercase ") |