first implementation of fullvoc tables

1 files changed, 12 insertions, 2 deletions

diff --git a/arabluatex.dtx b/arabluatex.dtx
index 72792db..67fa916 100644
--- a/arabluatex.dtx
+++ b/arabluatex.dtx
@@ -175,9 +175,11 @@
 %    \begin{macrocode}
 \DeclareOption{voc}{\def\al@mode{voc}}
 \DeclareOption{novoc}{\def\al@mode{novoc}}
+\DeclareOption{fullvoc}{\def\al@mode{fullvoc}}
 \ExecuteOptions{voc}
 \ProcessOptions\relax
 \def\al@mode@voc{voc}
+\def\al@mode@fullvoc{fullvoc}
 \def\al@mode@novoc{novoc}
 % \newif\ifal@mode@defined
 \RequirePackage{amsmath}
@@ -208,11 +210,15 @@
       \bgroup\textdir TRT\arabicfont%
       \luadirect{tex.sprint(processvoc("\luaescapestring{#2}"))}\egroup%
     \else%
+    \ifx\@tempa\al@mode@fullvoc%
+      \bgroup\textdir TRT\arabicfont%
+      \luadirect{tex.sprint(processfullvoc("\luaescapestring{#2}"))}\egroup%
+    \else%
     \ifx\@tempa\al@mode@novoc%
       \bgroup\textdir TRT\arabicfont%
       \luadirect{tex.sprint(processnovoc("\luaescapestring{#2}"))}\egroup%
     \else%
-    \fi\fi}
+    \fi\fi\fi}
 \DeclareDocumentCommand{\aemph}{m}{$\overline{\text{#1}}$}
 \NewEnviron{arab}[1][\al@mode]%
 {\par\edef\@tempa{#1}%
@@ -220,12 +226,16 @@
       \bgroup\pardir TRT\textdir TRT\arabicfont%
       \luadirect{tex.sprint(processvoc("\luaescapestring{\BODY}"))}\egroup%
     \else%
+    \ifx\@tempa\al@mode@fullvoc%
+      \bgroup\pardir TRT\textdir TRT\arabicfont%
+      \luadirect{tex.sprint(processfullvoc("\luaescapestring{\BODY}"))}\egroup%
+    \else%
     \ifx\@tempa\al@mode@novoc%
       \bgroup\pardir TRT\textdir TRT\arabicfont%
       \luadirect{tex.sprint(processnovoc("\luaescapestring{\BODY}"))}\egroup%
     \else
       \BODY% 
-    \fi\fi}[\par]
+    \fi\fi\fi}[\par]
 \robustify{\textbf}
 \robustify{\emph}
 \robustify{\footnote}