summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/polyglossia/gloss-arabic.ldf
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/latex/polyglossia/gloss-arabic.ldf')
-rw-r--r--Master/texmf-dist/tex/latex/polyglossia/gloss-arabic.ldf45
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