%% %% This is file `arabluatex-patch.sty', %% generated with the docstrip utility. %% %% The original source files were: %% %% arabluatex.dtx (with options: `patch') %% %% This is a generated file. %% %% This file is part of the `arabluatex' package %% %% ArabLuaTeX -- Processing ArabTeX notation under LuaLaTeX %% Copyright (C) 2016--2019 Robert Alessi %% %% Please send error reports and suggestions for improvements to Robert %% Alessi %% %% This program is free software: you can redistribute it and/or modify %% it under the terms of the GNU General Public License as published by %% the Free Software Foundation, either version 3 of the License, or %% (at your option) any later version. %% %% This program is distributed in the hope that it will be useful, but %% WITHOUT ANY WARRANTY; without even the implied warranty of %% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU %% General Public License for more details. %% %% You should have received a copy of the GNU General Public License %% along with this program. If not, see %% . %% %% This release of 'arabluatex' consists of the following source files: %% - arabluatex.ins %% - arabluatex.dtx %% - arabluatex.lua %% - arabluatex_voc.lua %% - arabluatex_fullvoc.lua %% - arabluatex_novoc.lua %% - arabluatex_trans.lua %% \NeedsTeXFormat{LaTeX2e} \ProvidesPackage{arabluatex-patch}% [2016/11/14 v1.0 patches for arabluatex] \def\list#1#2{% \ifnum \@listdepth >5\relax \@toodeep \else \global\advance\@listdepth\@ne \fi \rightmargin\z@ \listparindent\z@ \itemindent\z@ \csname @list\romannumeral\the\@listdepth\endcsname \def\@itemlabel{#1}% \let\makelabel\@mklab \@nmbrlistfalse #2\relax \@trivlist \parskip\parsep \parindent\listparindent \advance\linewidth -\rightmargin \advance\linewidth -\leftmargin \ifbool{al@rlmode}{\advance\@totalleftmargin \rightmargin}% {\advance\@totalleftmargin \leftmargin} \parshape \@ne \@totalleftmargin \linewidth \ignorespaces} \def\@item[#1]{% \if@noparitem \@donoparitem \else \if@inlabel \indent \par \fi \ifhmode \unskip\unskip \par \fi \if@newlist \if@nobreak \@nbitem \else \addpenalty\@beginparpenalty \addvspace\@topsep \addvspace{-\parskip}% \fi \else \addpenalty\@itempenalty \addvspace\itemsep \fi \global\@inlabeltrue \fi \everypar{% \@minipagefalse \global\@newlistfalse \if@inlabel \global\@inlabelfalse {\setbox\z@\lastbox \ifvoid\z@ \kern-\itemindent \fi}% \box\@labels \penalty\z@ \fi \if@nobreak \@nobreakfalse \clubpenalty \@M \else \clubpenalty \@clubpenalty \everypar{}% \fi}% \if@noitemarg \@noitemargfalse \if@nmbrlist \refstepcounter\@listctr \fi \fi \ifbool{al@rlmode}{\sRLbox\@tempboxa{\makelabel{#1}}}{% \sbox\@tempboxa{\makelabel{#1}}}% \ifbool{al@rlmode}{\global\setbox\@labels\hbox dir TRT}% {\global\setbox\@labels\hbox}{% \unhbox\@labels \hskip \itemindent \hskip -\labelwidth \hskip -\labelsep \ifdim \wd\@tempboxa >\labelwidth \box\@tempboxa \else \hbox to\labelwidth {\unhbox\@tempboxa}% \fi \hskip \labelsep}% \ignorespaces} \long\def\sRLbox#1#2{\setbox#1\hbox dir TRT{% \color@setgroup#2\color@endgroup}} \endinput %% %% End of file `arabluatex-patch.sty'.