From a4c414bd2688047f512f5818e079468fb1c5b5ce Mon Sep 17 00:00:00 2001 From: Robert Alessi Date: Wed, 6 Jul 2016 15:05:21 +0200 Subject: adapted \cap to accept the local hyphenation command \- --- arabluatex.lua | 4 ++-- 1 file 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) body = string.sub(body, 2, -2) return string.format("%s", body) end) - if string.find(str, "%-['`ʾʿ]") then + 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 + elseif string.find(str, "[^\\]%-[^'`ʾʿ]") then str = string.gsub(str, "(%-)", "%1\\MakeUppercase ") elseif string.find(str, "^['`ʾʿ]") then str = string.gsub(str, "^(['`])", "%1\\MakeUppercase ") -- cgit v1.2.3