aboutsummaryrefslogtreecommitdiff
path: root/arabluatex.lua
diff options
context:
space:
mode:
authorRobert Alessi <alessi@robertalessi.net>2018-08-12 12:22:51 +0200
committerRobert Alessi <alessi@robertalessi.net>2018-08-12 12:22:51 +0200
commit136c4a8f6ce140ecf7325c0fb0a92dc4bb6464a9 (patch)
tree71395134ab604a8b67106ad06e3440d17f9e88d8 /arabluatex.lua
parent5c6d0893befcc5ac8102d2fe9480f4be0046de68 (diff)
downloadarabluatex-136c4a8f6ce140ecf7325c0fb0a92dc4bb6464a9.tar.gz
better protection of \arb[]{} nested inside Arabic environments
Diffstat (limited to 'arabluatex.lua')
-rw-r--r--arabluatex.lua7
1 files changed, 5 insertions, 2 deletions
diff --git a/arabluatex.lua b/arabluatex.lua
index 4128955..c0d9022 100644
--- a/arabluatex.lua
+++ b/arabluatex.lua
@@ -54,7 +54,8 @@ local arbargs = lpeg.Cs(spce^-1 * bsqbrackets^-1 * bcbraces)
54local baytargs = lpeg.Cs(spce * bcbraces * bsqbrackets^-1 * bcbraces) 54local baytargs = lpeg.Cs(spce * bcbraces * bsqbrackets^-1 * bcbraces)
55 55
56local function protectarb(str) 56local function protectarb(str)
57 str = string.gsub(str, "(\\arb%s?)(%[.-%])(%b{})", "\\@arb%2%3") 57-- str = string.gsub(str, "(\\arb%s?)(%[.-%])(%b{})", "\\@arb%2%3")
58 str = string.gsub(str, "(\\arb%s?)(%[.-%])(%b{})", "\\al@brk{\\arb%2%3}")
58 str = string.gsub(str, "(\\LR%s?)(%b{})", "\\@LR%2") 59 str = string.gsub(str, "(\\LR%s?)(%b{})", "\\@LR%2")
59 str = string.gsub(str, "(\\RL%s?)(%b{})", "\\@RL%2") 60 str = string.gsub(str, "(\\RL%s?)(%b{})", "\\@RL%2")
60 return str 61 return str
@@ -670,6 +671,7 @@ function al_openstream()
670end 671end
671 672
672local function processarbtoutf(str) 673local function processarbtoutf(str)
674 str = "\n\\begin{arbexport}\n"..str
673 str = string.gsub(str, "(\\prname)%s?(%b{})", function(tag, body) 675 str = string.gsub(str, "(\\prname)%s?(%b{})", function(tag, body)
674 body = string.sub(body, 2, -2) 676 body = string.sub(body, 2, -2)
675 return string.format("\\arb[trans]{\\uc{%s}}", body) 677 return string.format("\\arb[trans]{\\uc{%s}}", body)
@@ -707,6 +709,7 @@ local function processarbtoutf(str)
707 body = string.gsub(body, "\\@al@cb%s?", "}") 709 body = string.gsub(body, "\\@al@cb%s?", "}")
708 return string.format("{%s}", body) 710 return string.format("{%s}", body)
709 end) 711 end)
712 str = str.."\n\\end{arbexport}"
710 return str 713 return str
711end 714end
712 715
@@ -784,7 +787,7 @@ function al_closestream()
784 t = string.gsub(t, "\\@al@ob%s?", "{") 787 t = string.gsub(t, "\\@al@ob%s?", "{")
785 t = string.gsub(t, "\\@al@cb", "}") 788 t = string.gsub(t, "\\@al@cb", "}")
786 t = string.gsub(t, "\n\n\n", "\n\n") 789 t = string.gsub(t, "\n\n\n", "\n\n")
787 if string.find(t, "\\begin%s?{document}.-\\arb") then 790 if string.find(t, "\\begin%s?{document}.-\\arb%s?[%[%{]") then
788 tex.print([[\unexpanded{\PackageWarningNoLine{arabluatex}{There are still 'arabtex' strings to be converted. Open ]]..tex.jobname..utffilesuffix..".tex"..[[ and compile it one more time}}]]) 791 tex.print([[\unexpanded{\PackageWarningNoLine{arabluatex}{There are still 'arabtex' strings to be converted. Open ]]..tex.jobname..utffilesuffix..".tex"..[[ and compile it one more time}}]])
789 else end 792 else end
790 t = t.."\n\\end{document}" 793 t = t.."\n\\end{document}"