aboutsummaryrefslogtreecommitdiff
path: root/arabluatex.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'arabluatex.dtx')
-rw-r--r--arabluatex.dtx9
1 files changed, 6 insertions, 3 deletions
diff --git a/arabluatex.dtx b/arabluatex.dtx
index 7128adf..c1633da 100644
--- a/arabluatex.dtx
+++ b/arabluatex.dtx
@@ -2973,17 +2973,20 @@ wa-ya.sIru ta.hta 'l-jild-i
2973\newlength{\al@bayt@width} 2973\newlength{\al@bayt@width}
2974\setlength{\al@bayt@width}{.3\textwidth} 2974\setlength{\al@bayt@width}{.3\textwidth}
2975\define@key[al]{verse}{width}{\setlength{\al@bayt@width}{#1}} 2975\define@key[al]{verse}{width}{\setlength{\al@bayt@width}{#1}}
2976\define@key[al]{verse}{metre}{#1} 2976\define@key[al]{verse}{metre}{\arb{#1}}
2977\define@boolkey[al]{verse}{utf}[true]{} 2977\define@boolkey[al]{verse}{utf}[true]{}
2978\define@choicekey[al]{verse}{mode}{fullvoc, voc, novoc, 2978\define@choicekey[al]{verse}{mode}{fullvoc, voc, novoc,
2979 trans}{\def\al@mode{#1}} 2979 trans}{\def\al@mode{#1}}
2980\presetkeys[al]{verse}{utf=false}{} 2980\presetkeys[al]{verse}{utf=false}{}
2981\NewDocumentEnvironment{arbverse}{O{} O{}}% 2981\NewDocumentEnvironment{arbverse}{O{} O{}}%
2982{\par\bgroup\setkeys[al]{verse}[metre]{#1}% 2982{\bgroup\setkeys[al]{verse}[metre]{#1}%
2983 \ifx\al@mode\al@mode@trans% 2983 \ifx\al@mode\al@mode@trans%
2984 \ifal@verse@utf\setRL\else\setLR\fi% 2984 \ifal@verse@utf\setRL\else\setLR\fi%
2985 \else\setRL\fi% 2985 \else\setRL\fi%
2986}{\newline\null\hfill\setkeys[al]{verse}[width,utf,mode]{#1}\egroup\par} 2986 \begin{center}
2987}%
2988{\end{center}%
2989\hfill\setkeys[al]{verse}[width,utf,mode]{#1}\egroup\par}
2987% \end{macrocode} 2990% \end{macrocode}
2988% \end{environment} 2991% \end{environment}
2989% \begin{macro}{\abjad} \cs{abjad}\marg{number} expresses its argument 2992% \begin{macro}{\abjad} \cs{abjad}\marg{number} expresses its argument