diff options
Diffstat (limited to 'tex/context/base/mkiv/phys-dim.mkiv')
-rw-r--r-- | tex/context/base/mkiv/phys-dim.mkiv | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/tex/context/base/mkiv/phys-dim.mkiv b/tex/context/base/mkiv/phys-dim.mkiv index b390ce64a..a05300cce 100644 --- a/tex/context/base/mkiv/phys-dim.mkiv +++ b/tex/context/base/mkiv/phys-dim.mkiv @@ -170,9 +170,8 @@ % \definesymbol[units][times][\ifmmode\cdot\else\kern.2\emwidth\cdot\kern.2\emwidth\fi] \unexpanded\def\digitstextbinop#1% assumes preceding - {\ifmmode#1\else\fourperemspace\nobreak#1\fourperemspace\fi} + {\ifmmode\mathord{#1}\else\nobreak#1\fi} -%def\digitstimessymbol{\ifmmode\cdot\else\digitstextbinop\cdot\fi} \def\digitstimessymbol{\digitstextbinop\times} \unexpanded\def\digitszeropadding {\hphantom{0}} @@ -406,8 +405,13 @@ % \endcsname} \unexpanded\def\phys_units_separator - {\edef\currentunitsseparator{\unitparameter\c!separator}% no longer needed - \ifcsname\??unitseparator\currentunitsseparator\endcsname\lastnamedcs\else\cdot\fi} + {\ifcsname\??unitseparator\unitparameter\c!separator\endcsname + \lastnamedcs + \else + \csname\??unitseparator\v!normal\endcsname + \fi} + +\installunitsseparator\v!normal{\ifmmode\mathord{\cdot}\else\cdot\fi} \installunitsseparator\v!normal {\cdot} \installunitsseparator\v!big {\unitsbigspace} @@ -521,9 +525,6 @@ {\edef\p_order{\unitparameter\c!order}% \ifx\p_order\v!reverse\expandafter\clf_unit_reverse\else\expandafter\clf_unit_normal\fi{\detokenize{#1}}} -\unexpanded\def\digitstextbinnop#1% - {\ifmmode#1\else#1\fourperemspace\fi} - \unexpanded\def\unitsPUS#1#2#3{\phys_units_next\prefixtext{#1}\unittext{#2}\unitsraise{\suffixtext{#3}}\c_phys_units_state\plusone} % suffix \unexpanded\def\unitsPU #1#2{\phys_units_next\prefixtext{#1}\unittext{#2}\c_phys_units_state\plusthree} % unit \unexpanded\def\unitsPS #1#2{\phys_units_next\prefixtext{#1}\unitsraise{\suffixtext{#2}}\c_phys_units_state\plusone} % suffix |