diff options
Diffstat (limited to 'Master/texmf-dist/tex/xelatex/xepersian/xepersian-mathsdigitspec.sty')
-rw-r--r-- | Master/texmf-dist/tex/xelatex/xepersian/xepersian-mathsdigitspec.sty | 46 |
1 files changed, 22 insertions, 24 deletions
diff --git a/Master/texmf-dist/tex/xelatex/xepersian/xepersian-mathsdigitspec.sty b/Master/texmf-dist/tex/xelatex/xepersian/xepersian-mathsdigitspec.sty index 3dedc20a1be..fea20f474b0 100644 --- a/Master/texmf-dist/tex/xelatex/xepersian/xepersian-mathsdigitspec.sty +++ b/Master/texmf-dist/tex/xelatex/xepersian/xepersian-mathsdigitspec.sty @@ -7,7 +7,7 @@ %% xepersian.dtx (with options: `xepersian-mathsdigitspec.sty') %% %% ______________________________________ -%% Copyright © 2008–2011 Vafa Khalighi +%% Copyright © 2008–2011 VAFA KHALIGHI %% %% License information appended. %% @@ -83,17 +83,14 @@ #1 } } -\ExplSyntaxOff \newcommand\setdigitfont[2][]{% \let\glb@currsize\relax - \setkeys*[xepersian-mathsdigitspec]{options}{#1}% - \edef\@tempa{\noexpand\zf@fontspec{Mapping=parsidigits,% - \XKV@rm}{#2}}\@tempa + \fontspec_set_family:Nnn \xepersian@digits@family {Mapping=parsidigits,#1}{#2} \xepersian@PackageInfo{Defining the default Persian maths digits font as '#2'} - \DeclareSymbolFont{OPERATORS} {EU1}{\zf@family} {m}{n} - \DeclareSymbolFont{new@mathbf@font@digits}{EU1}{\zf@family}{bx}{n} - \DeclareSymbolFont{new@mathit@font@digits}{EU1}{\zf@family}{m}{it} - \DeclareSymbolFont{new@mathrm@font@digits}{EU1}{\zf@family}{m}{n} + \DeclareSymbolFont{OPERATORS} {EU1}{\xepersian@digits@family} {m}{n} + \DeclareSymbolFont{new@mathbf@font@digits}{EU1}{\xepersian@digits@family}{bx}{n} + \DeclareSymbolFont{new@mathit@font@digits}{EU1}{\xepersian@digits@family}{m}{it} + \DeclareSymbolFont{new@mathrm@font@digits}{EU1}{\xepersian@digits@family}{m}{n} \def\persianmathsdigits{% \SetMathCode{`0}{\mathalpha}{OPERATORS}{`0} \SetMathCode{`1}{\mathalpha}{OPERATORS}{`1} @@ -107,20 +104,21 @@ \SetMathCode{`9}{\mathalpha}{OPERATORS}{`9} \SetMathCode{`\%}{\mathbin}{OPERATORS}{`٪} \SetMathCharDef{\decimalseparator}{\mathpunct}{OPERATORS}{"066B} - \let\mathbf\new@mathbf - \let\mathit\new@mathit - \let\mathrm\new@mathrm} + \cs_set_eq:NN \mathbf \new@mathbf + \cs_set_eq:NN \mathit \new@mathit + \cs_set_eq:NN \mathrm \new@mathrm} +} +\DeclareDocumentCommand \setmathsfdigitfont { O{} m } { + \fontspec_set_family:Nnn \g_fontspec_mathsf_tl {Mapping=parsidigits,#1}{#2} + \DeclareSymbolFont{new@mathsf@font@digits}{EU1}{\g_fontspec_mathsf_tl}{m}{n} + \def\persianmathsfdigits{\cs_set_eq:NN \mathsf \new@mathsf} } -\newcommand*\setmathsfdigitfont[2][]{% -\zf@fontspec{Mapping=parsidigits,#1}{#2}% -\let\zf@sfmaths\zf@family -\DeclareSymbolFont{new@mathsf@font@digits}{EU1}{\zf@family}{m}{n} -\def\persianmathsfdigits{\let\mathsf\new@mathsf}} -\newcommand*\setmathttdigitfont[2][]{% -\zf@fontspec{Mapping=parsidigits,#1}{#2}% -\let\zf@ttmaths\zf@family -\DeclareSymbolFont{new@mathtt@font@digits}{EU1}{\zf@family}{m}{n} -\def\persianmathttdigits{\let\mathtt\new@mathtt}} +\DeclareDocumentCommand \setmathttdigitfont { O{} m } { + \fontspec_set_family:Nnn \g_fontspec_mathtt_tl {Mapping=parsidigits,#1}{#2} + \DeclareSymbolFont{new@mathtt@font@digits}{EU1}{\g_fontspec_mathtt_tl}{m}{n} + \def\persianmathttdigits{\cs_set_eq:NN \mathtt \new@mathtt} +} +\ExplSyntaxOff \ifx\newcommand\undefined\else \newcommand{\ZifferAn}{} \fi @@ -165,14 +163,14 @@ \everymath\expandafter{\the\everymath\SetMathsDigits} \g@addto@macro\document{\everydisplay\expandafter{\the\everydisplay\SetMathsDigits}} %% -%% Copyright © 2008–2011 Vafa Khalighi <vafaklg@gmail.com> +%% Copyright © 2008–2011 VAFA KHALIGHI <vafaklg@gmail.com> %% %% It may be distributed and/or modified under the LaTeX Project Public License, %% version 1.3c or higher (your choice). The latest version of %% this license is at: http://www.latex-project.org/lppl.txt %% %% This work is “author-maintained” (as per LPPL maintenance status) -%% by Vafa Khalighi. +%% by VAFA KHALIGHI. %% %% %% |