diff options
Diffstat (limited to 'arabluatex.dtx')
-rw-r--r-- | arabluatex.dtx | 25 |
1 files changed, 15 insertions, 10 deletions
diff --git a/arabluatex.dtx b/arabluatex.dtx index 854fd98..5ccf530 100644 --- a/arabluatex.dtx +++ b/arabluatex.dtx | |||
@@ -261,7 +261,7 @@ | |||
261 | %</driver> | 261 | %</driver> |
262 | % \fi | 262 | % \fi |
263 | % | 263 | % |
264 | % \CheckSum{899} | 264 | % \CheckSum{0} |
265 | % | 265 | % |
266 | % \CharacterTable | 266 | % \CharacterTable |
267 | % {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 | 267 | % {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 |
@@ -4643,7 +4643,7 @@ wa-ya.sIru ta.hta 'l-jild-i | |||
4643 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% | 4643 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% |
4644 | \else% | 4644 | \else% |
4645 | \ifx\@tempa\al@mode@trans% | 4645 | \ifx\@tempa\al@mode@trans% |
4646 | \bgroup\textdir TLT\al@trans@style% | 4646 | \bgroup\textdir TLT\al@trans@font\al@trans@style% |
4647 | \luadirect{tex.sprint(processtrans(\luastringN{#2}, | 4647 | \luadirect{tex.sprint(processtrans(\luastringN{#2}, |
4648 | \luastringO{\al@trans@convention}, | 4648 | \luastringO{\al@trans@convention}, |
4649 | \luastringO{\al@arb@rules}, | 4649 | \luastringO{\al@arb@rules}, |
@@ -4707,7 +4707,7 @@ wa-ya.sIru ta.hta 'l-jild-i | |||
4707 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% | 4707 | \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup% |
4708 | \else% | 4708 | \else% |
4709 | \ifx\@tempa\al@mode@trans% | 4709 | \ifx\@tempa\al@mode@trans% |
4710 | \bgroup\pardir TLT\textdir TLT\al@trans@style% | 4710 | \bgroup\pardir TLT\textdir TLT\al@trans@font\al@trans@style% |
4711 | \luadirect{tex.sprint(processtrans(\luastringO{\BODY}, | 4711 | \luadirect{tex.sprint(processtrans(\luastringO{\BODY}, |
4712 | \luastringO{\al@trans@convention}, | 4712 | \luastringO{\al@trans@convention}, |
4713 | \luastringO{\al@arb@rules}, | 4713 | \luastringO{\al@arb@rules}, |
@@ -4748,18 +4748,23 @@ wa-ya.sIru ta.hta 'l-jild-i | |||
4748 | metre]{#1}% | 4748 | metre]{#1}% |
4749 | \if@pkg@export\ifal@verse@export% | 4749 | \if@pkg@export\ifal@verse@export% |
4750 | \ArbOutFile{\begin{arabverse}}% | 4750 | \ArbOutFile{\begin{arabverse}}% |
4751 | \ifx\al@mode\al@mode@trans% | 4751 | % \ifx\al@mode\al@mode@trans% |
4752 | \luadirect{tooutfile(\luastringN{[#1]})}% | 4752 | % \luadirect{tooutfile(\luastringN{[#1]})}% |
4753 | \else% | 4753 | % \else% |
4754 | \IfSubStr[1]{#1}{utf}% | 4754 | \IfSubStr[1]{#1}{utf}% |
4755 | {\luadirect{tooutfile(\luastringN{[#1]})}}% | 4755 | {\luadirect{tooutfile(\luastringN{[#1]})}}% |
4756 | {\luadirect{tooutfile(\luastringN{[#1, utf]})}}% | 4756 | {\luadirect{tooutfile(\luastringN{[#1, utf]})}}% |
4757 | \fi | 4757 | % \fi |
4758 | \else\fi\else\fi\egroup% | 4758 | \else\fi\else\fi\egroup% |
4759 | \par\centering\noindent\bgroup\setkeys[al]{verse}[metre]{#1}% | 4759 | \par\centering\noindent\bgroup\setkeys[al]{verse}[metre]{#1}% |
4760 | \ifx\al@mode\al@mode@trans% | 4760 | % \ifx\al@mode\al@mode@trans% |
4761 | \ifal@verse@utf\setRL\else\setLR\fi% | 4761 | % \ifal@verse@utf\setRL\else\setLR\fi% |
4762 | \else\setRL\fi% | 4762 | % \else\setRL\fi% |
4763 | \ifal@verse@utf% | ||
4764 | \ifx\al@mode\al@mode@trans\setLR\else\setRL\fi% | ||
4765 | \else% | ||
4766 | \ifx\al@mode\al@mode@trans\setLR\else\setRL\fi% | ||
4767 | \fi% | ||
4763 | \arab@v@export{#1} | 4768 | \arab@v@export{#1} |
4764 | }% | 4769 | }% |
4765 | {\endarab@v@export | 4770 | {\endarab@v@export |