first implementation of \arbup viz. superscript tanwīn in |dmg| mode

1 files changed, 5 insertions, 4 deletions

diff --git a/arabluatex.lua b/arabluatex.lua
index 0bb4756..eb0d55c 100644
--- a/arabluatex.lua
+++ b/arabluatex.lua
@@ -123,11 +123,12 @@ local function takeoutabjad(str)
    return str
 end
 
-local function takeoutcap(str)
+local function takeoutcapetc(str)
    str = string.gsub(str, "(\\cap.?)(%b{})", function(tag, body)
                         body = string.sub(body, 2, -2)
                         return string.format("%s", body)
    end)
+   str = string.gsub(str, "\\linebreak", "")
    return str
 end
 
@@ -421,7 +422,7 @@ end
 
 function processvoc(str, rules)
    str = "\\arb{".. str.."}"
-   str = takeoutcap(str)
+   str = takeoutcapetc(str)
    str = protectarb(str)
    str = breakcmd(str)
    str = holdcmd(str)
@@ -436,7 +437,7 @@ end
 
 function processfullvoc(str, rules)
    str = "\\arb{".. str.."}"
-   str = takeoutcap(str)
+   str = takeoutcapetc(str)
    str = protectarb(str)
    str = breakcmd(str)
    str = holdcmd(str)
@@ -451,7 +452,7 @@ end
 
 function processnovoc(str)
    str = "\\arb{".. str.."}"
-   str = takeoutcap(str)
+   str = takeoutcapetc(str)
    str = protectarb(str)
    str = breakcmd(str)
    str = holdcmd(str)