From 6202ee62d0f34509d7a652c30a1d5c19efec70ae Mon Sep 17 00:00:00 2001 From: Robert Alessi Date: Sun, 8 May 2016 16:09:05 +0200 Subject: done implementing 'easy' rules set --- arabluatex.dtx | 19 ++++++++++++------- 1 file changed, 12 insertions(+), 7 deletions(-) (limited to 'arabluatex.dtx') diff --git a/arabluatex.dtx b/arabluatex.dtx index f44b309..2661ad4 100644 --- a/arabluatex.dtx +++ b/arabluatex.dtx @@ -2061,7 +2061,7 @@ wa-ya.sIru ta.hta 'l-jildi % \end{macrocode} % \end{macro} % \begin{macro}{\SetArbEasy} -% \begin{macro}{\SetArbDeflt} +% \begin{macro}{\SetArbDflt} % By default, \package{arabluatex} applies complex rules to generate % euphonic \arb[trans]{ta^sdId}, \arb[trans]{'alif mamdUdaT} % \linebreak and \arb[trans]{sukUn} depending on the modes which are @@ -2073,7 +2073,7 @@ wa-ya.sIru ta.hta 'l-jildi % \begin{macrocode} \def\al@arb@rules{dflt} \NewDocumentCommand{\SetArbEasy}{}{\def\al@arb@rules{easy}} -\NewDocumentCommand{\SetArbDflt}{}{\def\al@arb@rules{default}} +\NewDocumentCommand{\SetArbDflt}{}{\def\al@arb@rules{dflt}} % \end{macrocode} % \end{macro} % \end{macro} @@ -2130,7 +2130,8 @@ wa-ya.sIru ta.hta 'l-jildi \else% \ifx\@tempa\al@mode@fullvoc% \bgroup\textdir TRT\arabicfont% - \luadirect{tex.sprint(processfullvoc(\luastringN{#2}))}\egroup% + \luadirect{tex.sprint(processfullvoc(\luastringN{#2}, + \luastringO{\al@arb@rules}))}\egroup% \else% \ifx\@tempa\al@mode@novoc% \bgroup\textdir TRT\arabicfont% @@ -2139,7 +2140,8 @@ wa-ya.sIru ta.hta 'l-jildi \ifx\@tempa\al@mode@trans% \bgroup\textdir TLT\al@trans@style% \luadirect{tex.sprint(processtrans(\luastringN{#2}, - \luastringO{\al@trans@convention}))}\egroup% + \luastringO{\al@trans@convention}, + \luastringO{\al@arb@rules}))}\egroup% \else% \fi\fi\fi\fi} % \end{macrocode} @@ -2152,11 +2154,13 @@ wa-ya.sIru ta.hta 'l-jildi {\par\edef\@tempa{#1}% \ifx\@tempa\al@mode@voc% \bgroup\pardir TRT\textdir TRT\arabicfont% - \luadirect{tex.sprint(processvoc(\luastringO{\BODY}))}\egroup% + \luadirect{tex.sprint(processvoc(\luastringO{\BODY}, + \luastringO{\al@arb@rules}))}\egroup% \else% \ifx\@tempa\al@mode@fullvoc% \bgroup\pardir TRT\textdir TRT\arabicfont% - \luadirect{tex.sprint(processfullvoc(\luastringO{\BODY}))}\egroup% + \luadirect{tex.sprint(processfullvoc(\luastringO{\BODY}, + \luastringO{\al@arb@rules}))}\egroup% \else% \ifx\@tempa\al@mode@novoc% \bgroup\pardir TRT\textdir TRT\arabicfont% @@ -2164,7 +2168,8 @@ wa-ya.sIru ta.hta 'l-jildi \else \ifx\@tempa\al@mode@trans% \bgroup\pardir TLT\textdir TLT\al@trans@style% \luadirect{tex.sprint(processtrans(\luastringO{\BODY}, - \luastringO{\al@trans@convention}))}\egroup% + \luastringO{\al@trans@convention}, + \luastringO{\al@arb@rules}))}\egroup% \else \fi\fi\fi\fi}[\par] % \end{macrocode} % \end{environment} -- cgit v1.2.3