From 6ef6fbd5deb831245fec275de126fc8b2a7f7979 Mon Sep 17 00:00:00 2001
From: Robert Alessi <alessi@robertalessi.net>
Date: Thu, 7 Jul 2016 09:48:50 +0200
Subject: \cap needed more work to accept \- properly
---
arabluatex.lua | 8 ++++----
1 file 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)
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 ")
+ 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 ")
+ str = string.gsub(str, "([^\\]%-)", "%1\\MakeUppercase ")
elseif string.find(str, "^['`ʾʿ]") then
str = string.gsub(str, "^(['`])", "%1\\MakeUppercase ")
str = string.gsub(str, "^(ʿ)", "%1\\MakeUppercase ")
--
cgit v1.2.3