diff options
Diffstat (limited to 'arabluatex.dtx')
-rw-r--r-- | arabluatex.dtx | 18 |
1 files changed, 10 insertions, 8 deletions
diff --git a/arabluatex.dtx b/arabluatex.dtx index d54290a..091ceb7 100644 --- a/arabluatex.dtx +++ b/arabluatex.dtx | |||
@@ -4059,7 +4059,7 @@ wa-ya.sIru ta.hta 'l-jild-i | |||
4059 | \DeclareOptionX{trans}{\def\al@mode{trans}} | 4059 | \DeclareOptionX{trans}{\def\al@mode{trans}} |
4060 | \define@boolkey{arabluatex.sty}[@pkg@]{export}[true]{% | 4060 | \define@boolkey{arabluatex.sty}[@pkg@]{export}[true]{% |
4061 | \AtBeginDocument{\luadirect{al_openstream()}% | 4061 | \AtBeginDocument{\luadirect{al_openstream()}% |
4062 | \MkArbBreak{@al@ob, @al@cb}} | 4062 | \MkArbBreak{@al@ob,@al@cb}} |
4063 | \AtEndDocument{\luadirect{al_closestream()}} | 4063 | \AtEndDocument{\luadirect{al_closestream()}} |
4064 | } | 4064 | } |
4065 | \ExecuteOptionsX{voc} | 4065 | \ExecuteOptionsX{voc} |
@@ -4094,8 +4094,8 @@ wa-ya.sIru ta.hta 'l-jild-i | |||
4094 | % and attempt to load the Amiri font which is included in \TeX{}live: | 4094 | % and attempt to load the Amiri font which is included in \TeX{}live: |
4095 | % \begin{macrocode} | 4095 | % \begin{macrocode} |
4096 | \AtBeginDocument{\ifdefined\arabicfont\relax\else | 4096 | \AtBeginDocument{\ifdefined\arabicfont\relax\else |
4097 | \PackageWarning{arabluatex}{\string\arabicfont\ is not defined.^^JI | 4097 | \PackageWarning{arabluatex}{\string\arabicfont\ is not defined.^^J |
4098 | will try to load Amiri}% | 4098 | I will try to load Amiri}% |
4099 | \newfontfamily\arabicfont[Script=Arabic]{Amiri}\fi}% | 4099 | \newfontfamily\arabicfont[Script=Arabic]{Amiri}\fi}% |
4100 | % \end{macrocode} | 4100 | % \end{macrocode} |
4101 | % \begin{macro}{\setRL} | 4101 | % \begin{macro}{\setRL} |
@@ -4471,7 +4471,8 @@ wa-ya.sIru ta.hta 'l-jild-i | |||
4471 | % Then follows the environment itself: | 4471 | % Then follows the environment itself: |
4472 | % \begin{macrocode} | 4472 | % \begin{macrocode} |
4473 | \NewDocumentEnvironment{arabverse}{O{}}% | 4473 | \NewDocumentEnvironment{arabverse}{O{}}% |
4474 | {\bgroup\setkeys[al]{verse}[width,gutter,color,utf,delim,mode,metre]{#1}% | 4474 | {\bgroup\setkeys[al]{verse}[width, gutter, color, utf, delim, mode, |
4475 | metre]{#1}% | ||
4475 | \if@pkg@export\ifal@verse@export% | 4476 | \if@pkg@export\ifal@verse@export% |
4476 | \ArbOutFile{\begin{arabverse}}% | 4477 | \ArbOutFile{\begin{arabverse}}% |
4477 | \luadirect{tooutfile(\luastringN{[#1]})}% | 4478 | \luadirect{tooutfile(\luastringN{[#1]})}% |
@@ -4480,10 +4481,11 @@ wa-ya.sIru ta.hta 'l-jild-i | |||
4480 | \ifx\al@mode\al@mode@trans% | 4481 | \ifx\al@mode\al@mode@trans% |
4481 | \ifal@verse@utf\setRL\else\setLR\fi% | 4482 | \ifal@verse@utf\setRL\else\setLR\fi% |
4482 | \else\setRL\fi}% | 4483 | \else\setRL\fi}% |
4483 | %{\hfill\setkeys[al]{verse}[width,gutter,utf,mode]{#1}\egroup\par} | 4484 | {\hfill\setkeys[al]{verse}[width, gutter, color, utf, delim, mode, |
4484 | {\hfill\setkeys[al]{verse}[width,gutter,color,utf,delim,mode,export]{#1}% | 4485 | export]{#1}% |
4485 | \egroup\par% | 4486 | \egroup\par% |
4486 | \bgroup\setkeys[al]{verse}[width,gutter,color,utf,delim,mode,metre]{#1}% | 4487 | \bgroup\setkeys[al]{verse}[width, gutter, color, utf, delim, mode, |
4488 | metre]{#1}% | ||
4487 | \if@pkg@export\ifal@verse@export% | 4489 | \if@pkg@export\ifal@verse@export% |
4488 | \ArbOutFile{\end{arabverse}}\else\fi\else\fi\egroup} | 4490 | \ArbOutFile{\end{arabverse}}\else\fi\else\fi\egroup} |
4489 | % \end{macrocode} | 4491 | % \end{macrocode} |
@@ -4695,7 +4697,7 @@ wa-ya.sIru ta.hta 'l-jild-i | |||
4695 | % right direction. | 4697 | % right direction. |
4696 | % \begin{macrocode} | 4698 | % \begin{macrocode} |
4697 | \NewDocumentCommand{\arbpardir}{}{% | 4699 | \NewDocumentCommand{\arbpardir}{}{% |
4698 | \ifx\al@mode\al@mode@trans\setLR\else\setRL\fi} | 4700 | \ifx\al@mode\al@mode@trans\setLR\else\booltrue{al@rlmode}\setRL\fi} |
4699 | % \end{macrocode} | 4701 | % \end{macrocode} |
4700 | % \end{macro} | 4702 | % \end{macro} |
4701 | % | 4703 | % |