From 9d6f3f6650abdaaa832c82ff77b83c4a9a8f3401 Mon Sep 17 00:00:00 2001 From: Robert Alessi Date: Wed, 22 Aug 2018 16:16:30 +0200 Subject: arabtex2utf: append 'utf' option to arabverse environment depending on default settings --- arabluatex.dtx | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/arabluatex.dtx b/arabluatex.dtx index 67d6545..6469ed3 100644 --- a/arabluatex.dtx +++ b/arabluatex.dtx @@ -4475,13 +4475,17 @@ wa-ya.sIru ta.hta 'l-jild-i % Then follows the environment itself: % \begin{macrocode} \NewDocumentEnvironment{arabverse}{O{}}% -{\bgroup\setkeys[al]{verse}[width, gutter, color, utf, delim, mode, +{\bgroup\setkeys[al]{verse}[width, gutter, color, utf, delim, metre]{#1}% \if@pkg@export\ifal@verse@export% - \ArbOutFile{\begin{arabverse}}% + \ArbOutFile{\begin{arabverse}}% + \ifx\al@mode\al@mode@trans% + \luadirect{tooutfile(\luastringN{[#1]})}% + \else% \IfSubStr[1]{#1}{utf}% {\luadirect{tooutfile(\luastringN{[#1]})}}% {\luadirect{tooutfile(\luastringN{[#1, utf]})}}% + \fi \else\fi\else\fi\egroup% \par\centering\noindent\bgroup\setkeys[al]{verse}[metre]{#1}% \ifx\al@mode\al@mode@trans% -- cgit v1.2.3