aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--arabluatex.dtx36
1 files changed, 18 insertions, 18 deletions
diff --git a/arabluatex.dtx b/arabluatex.dtx
index 4f185ce..7eb5ce7 100644
--- a/arabluatex.dtx
+++ b/arabluatex.dtx
@@ -263,7 +263,7 @@
263%</driver> 263%</driver>
264% \fi 264% \fi
265% 265%
266% \CheckSum{931} 266% \CheckSum{0}
267% 267%
268% \CharacterTable 268% \CharacterTable
269% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z 269% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
@@ -4696,33 +4696,33 @@ wa-ya.sIru ta.hta 'l-jild-i
4696% The |arab| environment does for paragraphs the same as \cs{arb} does 4696% The |arab| environment does for paragraphs the same as \cs{arb} does
4697% for short insertions of Arabic text. 4697% for short insertions of Arabic text.
4698% \begin{macrocode} 4698% \begin{macrocode}
4699\NewEnviron{arab}[1][\al@mode]% 4699\NewDocumentEnvironment{arab}{O{\al@mode} +b}%
4700{\par\edef\@tempa{#1}% 4700{\par\edef\@tempa{#1}%
4701 \ifx\@tempa\al@mode@voc% 4701 \ifx\@tempa\al@mode@voc%
4702 \booltrue{al@rlmode}% 4702 \booltrue{al@rlmode}%
4703 \bgroup\pardir TRT\textdir TRT\arabicfont% 4703 \bgroup\pardir TRT\textdir TRT\arabicfont%
4704 \luadirect{tex.sprint(arabluatex.processvoc(\luastringO{\BODY}, 4704 \luadirect{tex.sprint(arabluatex.processvoc(\luastringN{#2},
4705 \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% 4705 \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup%
4706 \else% 4706 \else%
4707 \ifx\@tempa\al@mode@fullvoc% 4707 \ifx\@tempa\al@mode@fullvoc%
4708 \booltrue{al@rlmode}% 4708 \booltrue{al@rlmode}%
4709 \bgroup\pardir TRT\textdir TRT\arabicfont% 4709 \bgroup\pardir TRT\textdir TRT\arabicfont%
4710 \luadirect{tex.sprint(arabluatex.processfullvoc(\luastringO{\BODY}, 4710 \luadirect{tex.sprint(arabluatex.processfullvoc(\luastringN{#2},
4711 \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% 4711 \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup%
4712 \else% 4712 \else%
4713 \ifx\@tempa\al@mode@novoc% 4713 \ifx\@tempa\al@mode@novoc%
4714 \booltrue{al@rlmode}% 4714 \booltrue{al@rlmode}%
4715 \bgroup\pardir TRT\textdir TRT\arabicfont% 4715 \bgroup\pardir TRT\textdir TRT\arabicfont%
4716 \luadirect{tex.sprint(arabluatex.processnovoc(\luastringO{\BODY}, 4716 \luadirect{tex.sprint(arabluatex.processnovoc(\luastringN{#2},
4717 \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% 4717 \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup%
4718 \else% 4718 \else%
4719 \ifx\@tempa\al@mode@trans% 4719 \ifx\@tempa\al@mode@trans%
4720 \bgroup\pardir TLT\textdir TLT\al@trans@font\al@trans@style% 4720 \bgroup\pardir TLT\textdir TLT\al@trans@font\al@trans@style%
4721 \luadirect{tex.sprint(arabluatex.processtrans(\luastringO{\BODY}, 4721 \luadirect{tex.sprint(arabluatex.processtrans(\luastringN{#2},
4722 \luastringO{\al@trans@convention}, 4722 \luastringO{\al@trans@convention},
4723 \luastringO{\al@arb@rules}, 4723 \luastringO{\al@arb@rules},
4724 \luastringO{\al@input@scheme}))}\egroup% 4724 \luastringO{\al@input@scheme}))}\egroup%
4725 \else \fi\fi\fi\fi}[\par] 4725 \else \fi\fi\fi\fi}{\par}
4726% \end{macrocode} 4726% \end{macrocode}
4727% \end{environment} 4727% \end{environment}
4728% \begin{environment}{arabverse} 4728% \begin{environment}{arabverse}
@@ -4775,7 +4775,7 @@ wa-ya.sIru ta.hta 'l-jild-i
4775 \else% 4775 \else%
4776 \ifx\al@mode\al@mode@trans\setLR\else\setRL\fi% 4776 \ifx\al@mode\al@mode@trans\setLR\else\setRL\fi%
4777 \fi% 4777 \fi%
4778 \arab@v@export{#1} 4778 \arab@v@export[#1]
4779 }% 4779 }%
4780 {\endarab@v@export 4780 {\endarab@v@export
4781 \hfill\setkeys[al]{verse}[width, gutter, color, utf, delim, mode, 4781 \hfill\setkeys[al]{verse}[width, gutter, color, utf, delim, mode,
@@ -4975,32 +4975,32 @@ wa-ya.sIru ta.hta 'l-jild-i
4975% selected |.tex| file with Unicode in place of the original 4975% selected |.tex| file with Unicode in place of the original
4976% |arabtex| or |buckwalter| strings. 4976% |arabtex| or |buckwalter| strings.
4977% \begin{macrocode} 4977% \begin{macrocode}
4978\NewEnviron{arabexport}{% 4978\NewDocumentEnvironment{arabexport}{+b}{%
4979 \if@pkg@export% 4979 \if@pkg@export%
4980 \par 4980 \par
4981 \BODY 4981 #1
4982 \luadirect{arabluatex.doexport("yes")} 4982 \luadirect{arabluatex.doexport("yes")}
4983 \luadirect{tex.sprint(arabluatex.arbtoutf(\luastringO{\BODY}))} 4983 \luadirect{tex.sprint(arabluatex.arbtoutf(\luastringN{#1}))}
4984 \luadirect{arabluatex.doexport("no")} 4984 \luadirect{arabluatex.doexport("no")}
4985 \else\par\BODY\fi 4985 \else\par#1\fi
4986 }[\par] 4986 }{\par}
4987% \end{macrocode} 4987% \end{macrocode}
4988% \end{environment} 4988% \end{environment}
4989% \begin{environment}{arab@v@export} The |arab@v@export| environment 4989% \begin{environment}{arab@v@export} The |arab@v@export| environment
4990% does for |arabverse| the same as |arabexport|. It is used 4990% does for |arabverse| the same as |arabexport|. It is used
4991% internally by |arabverse|. 4991% internally by |arabverse|.
4992% \begin{macrocode} 4992% \begin{macrocode}
4993\NewEnviron{arab@v@export}[1]{% 4993\NewDocumentEnvironment{arab@v@export}{O{} +b}{%
4994 \setkeys[al]{verse}[width, gutter, color, utf, delim, mode, 4994 \setkeys[al]{verse}[width, gutter, color, utf, delim, mode,
4995 metre]{#1} 4995 metre]{#1}
4996 \if@pkg@export\ifal@verse@export% 4996 \if@pkg@export\ifal@verse@export%
4997 \par 4997 \par
4998 \BODY 4998 #2
4999 \luadirect{arabluatex.doexport("arabverse")} 4999 \luadirect{arabluatex.doexport("arabverse")}
5000 \luadirect{tex.sprint(arabluatex.arbtoutf(\luastringO{\BODY}))} 5000 \luadirect{tex.sprint(arabluatex.arbtoutf(\luastringN{#2}))}
5001 \luadirect{arabluatex.doexport("no")} 5001 \luadirect{arabluatex.doexport("no")}
5002 \else\par\BODY\fi\else\par\BODY\fi 5002 \else\par#2\fi\else\par#2\fi
5003}[\par] 5003}{\par}
5004% \end{macrocode} 5004% \end{macrocode}
5005% \end{environment} 5005% \end{environment}
5006% \begin{macro}{\arbpardir} 5006% \begin{macro}{\arbpardir}