From e040b766b62c0e8cda0c2a89dab3de7b1de7efdc Mon Sep 17 00:00:00 2001
From: Robert Alessi <alessi@robertalessi.net>
Date: Tue, 2 Oct 2018 18:52:03 +0200
Subject: misplaced al@rlmode boolean

---
 arabluatex.dtx | 14 ++++----------
 1 file changed, 4 insertions(+), 10 deletions(-)

(limited to 'arabluatex.dtx')

diff --git a/arabluatex.dtx b/arabluatex.dtx
index 4f841e9..50af415 100644
--- a/arabluatex.dtx
+++ b/arabluatex.dtx
@@ -4563,25 +4563,19 @@ wa-ya.sIru ta.hta 'l-jild-i
 \NewDocumentCommand{\arb}{O{\al@mode} +m}%
 {\edef\@tempa{#1}%
   \ifx\@tempa\al@mode@voc%
-  \booltrue{al@rlmode}%
-  \bgroup\textdir TRT\arabicfont%
+  \bgroup\booltrue{al@rlmode}\textdir TRT\arabicfont%
   \luadirect{tex.sprint(processvoc(\luastringN{#2},
     \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup%
-  \boolfalse{al@rlmode}%
   \else%
   \ifx\@tempa\al@mode@fullvoc%
-  \booltrue{al@rlmode}%
-  \bgroup\textdir TRT\arabicfont%
+  \bgroup\booltrue{al@rlmode}\textdir TRT\arabicfont%
   \luadirect{tex.sprint(processfullvoc(\luastringN{#2},
     \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup%
-  \boolfalse{al@rlmode}%
   \else%
   \ifx\@tempa\al@mode@novoc%
-  \booltrue{al@rlmode}%
-  \bgroup\textdir TRT\arabicfont%
+  \bgroup\booltrue{al@rlmode}\textdir TRT\arabicfont%
   \luadirect{tex.sprint(processnovoc(\luastringN{#2},
     \luastringO{\al@arb@rules}, \luastringO{\al@input@scheme}))}\egroup%
-  \boolfalse{al@rlmode}%
   \else%
   \ifx\@tempa\al@mode@trans%
   \bgroup\textdir TLT\al@trans@style%
@@ -4939,7 +4933,7 @@ wa-ya.sIru ta.hta 'l-jild-i
 % right direction.
 %    \begin{macrocode}
 \NewDocumentCommand{\arbpardir}{}{%
-  \ifx\al@mode\al@mode@trans\setLR\else\booltrue{al@rlmode}\setRL\fi}
+  \ifx\al@mode\al@mode@trans\setLR\else\setRL\fi}
 %    \end{macrocode}
 % \end{macro}
 % 
-- 
cgit v1.2.3

