From bcd2a249061d0f428c4166a2b760a2251b8ba64b Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Tue, 31 May 2022 19:46:53 +0000 Subject: xepersian (31may22) git-svn-id: svn://tug.org/texlive/trunk@63461 c570f23f-e606-0410-a88d-b1316a301751 --- .../tex/xelatex/xepersian/xepersian-mathdigitspec.sty | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) (limited to 'Master/texmf-dist/tex/xelatex/xepersian/xepersian-mathdigitspec.sty') diff --git a/Master/texmf-dist/tex/xelatex/xepersian/xepersian-mathdigitspec.sty b/Master/texmf-dist/tex/xelatex/xepersian/xepersian-mathdigitspec.sty index 27b780d7c93..360a01913cc 100644 --- a/Master/texmf-dist/tex/xelatex/xepersian/xepersian-mathdigitspec.sty +++ b/Master/texmf-dist/tex/xelatex/xepersian/xepersian-mathdigitspec.sty @@ -20,7 +20,7 @@ %% by Vafa Khalighi. %% %% -%% \CheckSum{11118} +%% \CheckSum{11130} %% \CharacterTable %% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z %% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z @@ -289,9 +289,11 @@ \ExplSyntaxOff \mathchardef\decimalseparator@point="013A -{% - \catcode`\.=\active - \gdef.{\begingroup\obeyspaces\futurelet\@let@token\decimalseparator@pointcheck}} +\bgroup + \uccode`\~`\.% + \uppercase{% +\egroup + \def~}{\begingroup\obeyspaces\futurelet\@let@token\decimalseparator@pointcheck} \def\decimalseparator@pointcheck{\decimalseparator@check\MathDecimalSeparator\decimalseparator@point} \def\decimalseparator@check#1#2{% \ifx\@let@token1\endgroup#1\else -- cgit v1.2.3