From 1b3e30ddaa7c3622ba7986d093716bd9a7abbe63 Mon Sep 17 00:00:00 2001
From: Robert Alessi <alessi@robertalessi.net>
Date: Mon, 1 Jan 2018 18:01:36 +0100
Subject: names inside \cap{} may be surrounded by brackets

---
 arabluatex.lua | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/arabluatex.lua b/arabluatex.lua
index a720ed8..1984d6c 100644
--- a/arabluatex.lua
+++ b/arabluatex.lua
@@ -670,42 +670,42 @@ function cap(str)
 			body = string.sub(body, 2, -2)
 			return string.format("%s", body)
    end)
-   str = string.gsub(str, "(%s)(bn)", "%1{%2}")
+   str = string.gsub(str, "(%s[%(%<%[]?)(bn)", "%1{%2}")
    for i = 1,#lcuc do
       str = string.gsub(str, "^([%S]-%-[`']?)"..lcuc[i].a, "{%1"..lcuc[i].b.."}")
    end
    for i = 1,#lcuc do
-      str = string.gsub(str, "(%s)([%S]-%-[`']?)"..lcuc[i].a, "%1{%2"..lcuc[i].b.."}")
+      str = string.gsub(str, "(%s[%(%<%[]?)([%S]-%-[`']?)"..lcuc[i].a, "%1{%2"..lcuc[i].b.."}")
    end
    for i = 1,#lcuc do
       str = string.gsub(str, "^([%S]-%-ʿ)"..lcuc[i].a, "{%1"..lcuc[i].b.."}")
    end
    for i = 1,#lcuc do
-      str = string.gsub(str, "(%s)([%S]-%-ʿ)"..lcuc[i].a, "%1{%2"..lcuc[i].b.."}")
+      str = string.gsub(str, "(%s[%(%<%[]?)([%S]-%-ʿ)"..lcuc[i].a, "%1{%2"..lcuc[i].b.."}")
    end
    for i = 1,#lcuc do
       str = string.gsub(str, "^([%S]-%-ʾ)"..lcuc[i].a, "{%1"..lcuc[i].b.."}")
    end
    for i = 1,#lcuc do
-      str = string.gsub(str, "(%s)([%S]-%-ʾ)"..lcuc[i].a, "%1{%2"..lcuc[i].b.."}")
+      str = string.gsub(str, "(%s[%(%<%[]?)([%S]-%-ʾ)"..lcuc[i].a, "%1{%2"..lcuc[i].b.."}")
    end
    for i = 1,#lcuc do
       str = string.gsub(str, "^(ʾ)"..lcuc[i].a, "{%1"..lcuc[i].b.."}")
    end
    for i = 1,#lcuc do
-      str = string.gsub(str, "(%s)(ʾ)"..lcuc[i].a, "%1{%2"..lcuc[i].b.."}")
+      str = string.gsub(str, "(%s[%(%<%[]?)(ʾ)"..lcuc[i].a, "%1{%2"..lcuc[i].b.."}")
    end
    for i = 1,#lcuc do
       str = string.gsub(str, "^(ʿ)"..lcuc[i].a, "{%1"..lcuc[i].b.."}")
    end
    for i = 1,#lcuc do
-      str = string.gsub(str, "(%s)(ʿ)"..lcuc[i].a, "%1{%2"..lcuc[i].b.."}")
+      str = string.gsub(str, "(%s[%(%<%[]?)(ʿ)"..lcuc[i].a, "%1{%2"..lcuc[i].b.."}")
    end
    for i = 1,#lcuc do
       str = string.gsub(str, "^"..lcuc[i].a, lcuc[i].b)
    end
    for i = 1,#lcuc do
-      str = string.gsub(str, "(%s)"..lcuc[i].a, "%1"..lcuc[i].b)
+      str = string.gsub(str, "(%s[%(%<%[]?)"..lcuc[i].a, "%1"..lcuc[i].b)
    end
    return "\\txtrans{"..str.."}"
 end
-- 
cgit v1.2.3