diff options
Diffstat (limited to 'Master/texmf-dist/tex/context/base/font-run.tex')
-rw-r--r-- | Master/texmf-dist/tex/context/base/font-run.tex | 25 |
1 files changed, 14 insertions, 11 deletions
diff --git a/Master/texmf-dist/tex/context/base/font-run.tex b/Master/texmf-dist/tex/context/base/font-run.tex index 08537e374cf..d657aa40208 100644 --- a/Master/texmf-dist/tex/context/base/font-run.tex +++ b/Master/texmf-dist/tex/context/base/font-run.tex @@ -17,6 +17,9 @@ \unprotect +\gdef\@@onlyenglish#1% + {\blank{\tttf \type {#1} is only available in the english interface}\blank} + \gdef\dosetshowfonttitle#1% {\tabskip\zeropoint \parindent\zeropoint @@ -28,7 +31,7 @@ {\doifnot{[\fontclass]}\title {\edef\title{[\fontclass]\space\title}}}} -\gdef\showbodyfont% +\gdef\showbodyfont {\dosingleempty\doshowbodyfont} \gdef\doshowbodyfont[#1]% @@ -81,7 +84,7 @@ &&\getvalue{\bodyfontvariable{##1\c!xx}}% &&\getvalue{\bodyfontvariable{##1\interfaced\v!small}}% &&\getvalue{\bodyfontvariable{##1\interfaced\v!big}}% - &&\getvalue{\bodyfontvariable{##1\c!interlinespace}}&\cr + &&\edef\next{\getvalue{\bodyfontvariable{##1\c!interlinespace}}}\ifx\next\empty not set\else\next\fi&\cr \noalign{\hrule}} \halign to \localhsize {##&\vrule##\strut @@ -105,7 +108,7 @@ \beginTEX \iffontchar -\gdef\iffontchar#1#2{\iftrue} + \gdef\iffontchar#1#2{\iftrue} \endTEX @@ -178,15 +181,15 @@ \nointerlineskip \vskip2pt % the \noexpand before \blank is needed for non etex - \edef\ascii {name: {\noexpand\black\fontname\font}} + \edef\ascii{name: {\noexpand\black\fontname\font}} \doifelse\v!unknown{#2} {\edef\theshowfontspecs - {name: {\noexpand\black\fontname\font}}} + {name: {\noexpand\black\fontname\font}}} {\edef\theshowfontspecs - {name: {\noexpand\black\fontname\font }\noexpand\quad + {name: {\noexpand\black\fontname\font}\noexpand\quad encoding: {\noexpand\black\currentencoding}\noexpand\quad - mapping: {\noexpand\black\currentmapping }\noexpand\quad - handling: {\noexpand\black\fonthandling }}}% + mapping: {\noexpand\black\currentmapping }\noexpand\quad + handling: {\noexpand\black\fonthandling}}}% \tf % also sets em \hbox to 40em{\blue\hfill\tinyfont\setstrut\strut\theshowfontspecs} \egroup @@ -227,7 +230,7 @@ \gdef\showligatures[#1]% {\ifx\starttabulate\undefined - \blank{\tttf \type {\showligatures} is only available in thr english interface}\blank + \@@onlyenglish\showligatures \else \bgroup \setupcolors[\c!state=\v!local]% @@ -247,7 +250,7 @@ \gdef\doshowfontstrip[#1]% {\ifx\starttabulate\undefined - \blank{\tttf \type {\showfontstrip} is only available in thr english interface}\blank + \@@onlyenglish\showfontstrip \else \bgroup \def\dofontstripa##1##2% @@ -303,7 +306,7 @@ \gdef\showminimalbaseline {\ifx\starttabulate\undefined - \blank{\tttf \type {\showminimalbaseline} is only available in thr english interface}\blank + \@@onlyenglish\showminimalbaseline \else \starttabulate[||T|T|T|T|T|T|T|T|T|] \testminimalbaseline{\hbox to 1em{\hss\showstruts\strut\hss}}% |