aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRobert Alessi <alessi@robertalessi.net>2018-08-16 19:05:23 +0200
committerRobert Alessi <alessi@robertalessi.net>2018-08-16 19:05:23 +0200
commit27e0c17214c69eccc700ab6d6c178b706a20619a (patch)
tree73ea6126310a3545e41185c633d49452d1959677
parentb7b8ca1722448ffcd363bcbac38ccede672c5644 (diff)
downloadarabluatex-27e0c17214c69eccc700ab6d6c178b706a20619a.tar.gz
removed \arbmetre which had become unnecessary. added 'starred' version of \ArbOutFile
-rw-r--r--arabluatex.dtx19
1 files changed, 9 insertions, 10 deletions
diff --git a/arabluatex.dtx b/arabluatex.dtx
index 091ceb7..a2a61cd 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,@al@cb@sp}}
4063 \AtEndDocument{\luadirect{al_closestream()}} 4063 \AtEndDocument{\luadirect{al_closestream()}}
4064} 4064}
4065\ExecuteOptionsX{voc} 4065\ExecuteOptionsX{voc}
@@ -4445,20 +4445,16 @@ wa-ya.sIru ta.hta 'l-jild-i
4445% typesetting Arabic poetry} The |arabverse| environment may receive 4445% typesetting Arabic poetry} The |arabverse| environment may receive
4446% different options: |mode|, |width|, |gutter|, |metre|, |color|, 4446% different options: |mode|, |width|, |gutter|, |metre|, |color|,
4447% |utf| and |delim|; all of them are defined here just before the 4447% |utf| and |delim|; all of them are defined here just before the
4448% |arabverse| environment. \changes{v1.13}{2018/07/30}{New command 4448% |arabverse| environment. \changes{v1.13}{2018/08/06}{New option
4449% \cs{arbmetre}}\cs{arbmetre} does nothing. It takes the metre as 4449% \texttt{color} to \texttt{arabverse} environment.}
4450% argument so that it can be distinguished from the last \cs{bayt}
4451% command. \changes{v1.13}{2018/08/06}{New option \texttt{color} to
4452% \texttt{arabverse} environment.}
4453% \begin{macrocode} 4450% \begin{macrocode}
4454\NewDocumentCommand{\arbmetre}{m}{#1}
4455\newlength{\al@bayt@width} 4451\newlength{\al@bayt@width}
4456\newlength{\al@gutter@width} 4452\newlength{\al@gutter@width}
4457\setlength{\al@bayt@width}{.3\textwidth} 4453\setlength{\al@bayt@width}{.3\textwidth}
4458\setlength{\al@gutter@width}{.15\al@bayt@width} 4454\setlength{\al@gutter@width}{.15\al@bayt@width}
4459\define@key[al]{verse}{width}{\setlength{\al@bayt@width}{#1}} 4455\define@key[al]{verse}{width}{\setlength{\al@bayt@width}{#1}}
4460\define@key[al]{verse}{gutter}{\setlength{\al@gutter@width}{#1}} 4456\define@key[al]{verse}{gutter}{\setlength{\al@gutter@width}{#1}}
4461\define@key[al]{verse}{metre}{\arb{\arbmetre{#1}}} 4457\define@key[al]{verse}{metre}{\arb{#1}}
4462\define@key[al]{verse}{color}[]{\color{#1}} 4458\define@key[al]{verse}{color}[]{\color{#1}}
4463\define@boolkey[al]{verse}{utf}[true]{} 4459\define@boolkey[al]{verse}{utf}[true]{}
4464\define@boolkey[al]{verse}{delim}[true]{} 4460\define@boolkey[al]{verse}{delim}[true]{}
@@ -4664,9 +4660,12 @@ wa-ya.sIru ta.hta 'l-jild-i
4664% |newline| as an optional argument in which case a carriage return is 4660% |newline| as an optional argument in which case a carriage return is
4665% appended to |string|. 4661% appended to |string|.
4666% \begin{macrocode} 4662% \begin{macrocode}
4667\NewDocumentCommand{\ArbOutFile}{O{no} +m}{% 4663\NewDocumentCommand{\ArbOutFile}{s O{no} +m}{%
4668 \if@pkg@export% 4664 \if@pkg@export%
4669 \luadirect{tooutfile(\luastringN{#2}, "#1")}\else\fi} 4665 \IfBooleanTF{#1}{%
4666 #3\luadirect{tooutfile(\luastringN{#3}, "#2")}}{%
4667 \luadirect{tooutfile(\luastringN{#3}, "#2")}}%
4668 \else\IfBooleanTF{#1}{#3}{}\fi}
4670% \end{macrocode} 4669% \end{macrocode}
4671% \end{macro} 4670% \end{macro}
4672% \begin{environment}{arabexport} 4671% \begin{environment}{arabexport}