diff options
Diffstat (limited to 'arabluatex.lua')
-rw-r--r-- | arabluatex.lua | 35 |
1 files changed, 0 insertions, 35 deletions
diff --git a/arabluatex.lua b/arabluatex.lua index ac6a251..b578ec5 100644 --- a/arabluatex.lua +++ b/arabluatex.lua | |||
@@ -54,7 +54,6 @@ local arbargs = lpeg.Cs(spce^-1 * bsqbrackets^-1 * bcbraces) | |||
54 | local baytargs = lpeg.Cs(spce * bcbraces * bsqbrackets^-1 * bcbraces) | 54 | local baytargs = lpeg.Cs(spce * bcbraces * bsqbrackets^-1 * bcbraces) |
55 | 55 | ||
56 | local function protectarb(str) | 56 | local function protectarb(str) |
57 | -- str = string.gsub(str, "(\\arb%s?)(%[.-%])(%b{})", "\\@arb%2%3") | ||
58 | str = string.gsub(str, "(\\arb%s?)(%[.-%])(%b{})", "\\al@brk{\\arb%2%3}") | 57 | str = string.gsub(str, "(\\arb%s?)(%[.-%])(%b{})", "\\al@brk{\\arb%2%3}") |
59 | str = string.gsub(str, "(\\LR%s?)(%b{})", "\\@LR%2") | 58 | str = string.gsub(str, "(\\LR%s?)(%b{})", "\\@LR%2") |
60 | str = string.gsub(str, "(\\RL%s?)(%b{})", "\\@RL%2") | 59 | str = string.gsub(str, "(\\RL%s?)(%b{})", "\\@RL%2") |
@@ -740,18 +739,6 @@ function arbtoutf(str) | |||
740 | body = string.gsub(body, "(\\arbmark)%s?(%b{})", "}%1%2\\ArbOutFile{") | 739 | body = string.gsub(body, "(\\arbmark)%s?(%b{})", "}%1%2\\ArbOutFile{") |
741 | return string.format("%s{%s}", tag, body) | 740 | return string.format("%s{%s}", tag, body) |
742 | end) | 741 | end) |
743 | -- str = string.gsub(str, "(\\arb%s?)(%b[])(%b{})", "}%1%2%3\\ArbOutFile{") | ||
744 | -- str = string.gsub(str, "(\\arb)%s?(%b{})", "}%1%2\\ArbOutFile{") | ||
745 | -- str = gsub(str, lpeg.Cs("\\bayt") * baytargs, "}\\ArbOutFile{\\bayt}%1%2\\ArbOutFile{") | ||
746 | -- str = gsub(str, lpeg.Cs("\\arb") * arbargs, "}%1%2\\ArbOutFile{") | ||
747 | -- str = string.gsub(str, "(\\abjad)%s?(%b{})", "}%1%2\\ArbOutFile{") | ||
748 | -- str = string.gsub(str, "(\\abjad)(%s?)(%b{})", "}%1%3\\ArbOutFile{") | ||
749 | -- str = string.gsub(str, "(\\begin%s?{arab})", "}%1") | ||
750 | -- str = string.gsub(str, "(\\end%s?{arab})", "%1\\ArbOutFile{") | ||
751 | -- str = string.gsub(str, "(\\begin)", "\n%1") | ||
752 | -- str = string.gsub(str, "(\\end)", "\n%1") | ||
753 | -- str = string.gsub(str, "(\\bayt)", "\n%1") | ||
754 | -- str = string.gsub(str, "(\\\\)", "%1\n") | ||
755 | return str | 742 | return str |
756 | end | 743 | end |
757 | 744 | ||
@@ -770,27 +757,6 @@ function al_closestream() | |||
770 | local f = io.open(tex.jobname..utffilesuffix.."_tmp.tex", "r") | 757 | local f = io.open(tex.jobname..utffilesuffix.."_tmp.tex", "r") |
771 | local o = io.open(tex.jobname..utffilesuffix..".tex", "w") | 758 | local o = io.open(tex.jobname..utffilesuffix..".tex", "w") |
772 | local t = f:read("*a") | 759 | local t = f:read("*a") |
773 | --[[ next lines need work! | ||
774 | -- t = string.gsub(t, "{\\textdir TRT\\arabicfont{}", "\\txarb{") | ||
775 | t = string.gsub(t, "(\\bayt%s?)\\txarb(%b{})\\txarb(%b{})\\txarb(%b{})", | ||
776 | function(tag, bodyi, bodyii, bodyiii) | ||
777 | bodyii = string.sub(bodyii, 2, -2) | ||
778 | return string.format("%s%s[%s]%s", | ||
779 | tag, bodyi, bodyii, bodyiii) | ||
780 | end) | ||
781 | t = string.gsub(t, "(\\bayt%s?)\\txarb(%b{})\\txarb(%b{})", "%1%2%3") | ||
782 | t = string.gsub(t, "{\\textdir TRT\\arbmetre{\\arabicfont{}", "\\arbmetre{\\txarb{") | ||
783 | t = string.gsub(t, "(\\bayt%s?)\\txtrans(%b{})\\txtrans(%b{})\\txtrans(%b{})", | ||
784 | function(tag, bodyi, bodyii, bodyiii) | ||
785 | bodyii = string.sub(bodyii, 2, -2) | ||
786 | return string.format("%s%s[%s]%s", | ||
787 | tag, bodyi, bodyii, bodyiii) | ||
788 | end) | ||
789 | t = string.gsub(t, "(\\bayt%s?)\\txtrans(%b{})\\txtrans(%b{})", "%1%2%3") | ||
790 | t = string.gsub(t, "\\txtrans{\\arbmetre{", "\\arbmetre{\\txtrans{") | ||
791 | t = string.gsub(t, "\\arbmetre", "\\\\\n\\hfill") | ||
792 | t = string.gsub(t, "(\\bayt)", "\n%1") | ||
793 | --]] | ||
794 | t = string.gsub(t, "\\arabicfont{}", "") | 760 | t = string.gsub(t, "\\arabicfont{}", "") |
795 | t = string.gsub(t, "\\par ", "\n\n") | 761 | t = string.gsub(t, "\\par ", "\n\n") |
796 | t = string.gsub(t, "(%s?)(\\@al@ob%s?)", "{") | 762 | t = string.gsub(t, "(%s?)(\\@al@ob%s?)", "{") |
@@ -808,7 +774,6 @@ function al_closestream() | |||
808 | f:close() | 774 | f:close() |
809 | o:close() | 775 | o:close() |
810 | os.remove(tex.jobname..utffilesuffix.."_tmp.tex") | 776 | os.remove(tex.jobname..utffilesuffix.."_tmp.tex") |
811 | -- os.rename(tex.jobname.."_out_tmp.tex", tex.jobname.."_out.tex") | ||
812 | return true | 777 | return true |
813 | end | 778 | end |
814 | 779 | ||