diff options
Diffstat (limited to 'Master/texmf-dist/tex/latex/polyglossia/gloss-arabic.ldf')
-rw-r--r-- | Master/texmf-dist/tex/latex/polyglossia/gloss-arabic.ldf | 45 |
1 files changed, 27 insertions, 18 deletions
diff --git a/Master/texmf-dist/tex/latex/polyglossia/gloss-arabic.ldf b/Master/texmf-dist/tex/latex/polyglossia/gloss-arabic.ldf index 72eff1260bb..858719b6a71 100644 --- a/Master/texmf-dist/tex/latex/polyglossia/gloss-arabic.ldf +++ b/Master/texmf-dist/tex/latex/polyglossia/gloss-arabic.ldf @@ -15,9 +15,10 @@ and may look very wrong.} langtag=ARA, scripttag=arab, hyphennames={nohyphenation}, - fontsetup=true + fontsetup=true, + envname=Arabic, + localnumeral=arabicnumerals %TODO localalph={abjad,abjad} - %TODO localnumber=arabicnumber } \newif\ifeastern@numerals @@ -137,6 +138,9 @@ and may look very wrong.} \fi% \fi}} + +\newcommand{\arabicnumerals}[2]{\arabicnumber{#2}} + \def\arabicnumber#1{% \ifeastern@numerals \arabicdigits{\number#1}% @@ -182,34 +186,39 @@ and may look very wrong.} \ifnum#1=\z@\fi\abj@maghribi@num@iii} \def\arabic@numbers{% - \let\@origalph\@alph% - \let\@origAlph\@Alph% \let\@alph\abjad% \let\@Alph\abjad% } + \def\noarabic@numbers{% - \let\@alph\@origalph% - \let\@Alph\@origAlph% - } + \let\@alph\latin@alph% + \let\@Alph\latin@Alph% +} + +% Store original definition +\let\xpg@save@arabic\@arabic \def\arabic@globalnumbers{% - \let\orig@arabic\@arabic% \let\@arabic\arabicnumber% - \renewcommand\thefootnote{\protect\arabicnumber{\c@footnote}}% - } + \renewcommand\thefootnote{\localnumeral*{footnote}}% + \renewcommand\theequation{\localnumeral*{equation}}% +} -\def\noarabic@globalnumbers{ - \let\@arabic\orig@arabic% - \renewcommand\thefootnote{\protect\number{\c@footnote}}% - } +\def\noarabic@globalnumbers{% + \let\@arabic\xpg@save@arabic% +} + +% Save original \MakeUppercase definition +\let\xpg@save@MakeUppercase\MakeUppercase \def\blockextras@arabic{% - \let\orig@MakeUppercase\MakeUppercase% \def\MakeUppercase##1{##1}% % TODO disable \@Roman and \@roman ? - } +} + \def\noextras@arabic{% - \let\MakeUppercase\orig@MakeUppercase% - } + % restore original \MakeUppercase definition + \let\MakeUppercase\xpg@save@MakeUppercase +} \endinput |