diff options
author | Hans Hagen <pragma@wxs.nl> | 2018-04-04 01:35:49 +0200 |
---|---|---|
committer | Context Git Mirror Bot <phg42.2a@gmail.com> | 2018-04-04 01:35:49 +0200 |
commit | 67b9965fe473d18f13ed4c40f1e4e008eb870322 (patch) | |
tree | 1fc107ceb55ed3f7dd6872fd3a2d304aeba684f7 /tex/context/base/mkiv/font-ini.mkvi | |
parent | 15ab7c153a96a9befc4e2c1774e701f3c941cc2d (diff) | |
download | context-67b9965fe473d18f13ed4c40f1e4e008eb870322.tar.gz |
2018-04-04 00:59:00
Diffstat (limited to 'tex/context/base/mkiv/font-ini.mkvi')
-rw-r--r-- | tex/context/base/mkiv/font-ini.mkvi | 28 |
1 files changed, 23 insertions, 5 deletions
diff --git a/tex/context/base/mkiv/font-ini.mkvi b/tex/context/base/mkiv/font-ini.mkvi index ee20d7b32..693182919 100644 --- a/tex/context/base/mkiv/font-ini.mkvi +++ b/tex/context/base/mkiv/font-ini.mkvi @@ -2510,14 +2510,32 @@ % \popmacro\fontclass % \ifx\fontclass\empty\else\setupbodyfont\relax\fi} +% \unexpanded\def\usebodyfont[#1]% +% {\pushmacro\fontclass +% \font_helpers_set_font\zerocount{#1}% +% \popmacro\fontclass +% \ifx\fontclass\empty \else +% \font_basics_setupbodyfont_nop +% \fi} + \unexpanded\def\usebodyfont[#1]% - {\pushmacro\fontclass - \font_helpers_set_font\zerocount{#1}% - \popmacro\fontclass - \ifx\fontclass\empty \else - \font_basics_setupbodyfont_nop + {\ifx\fontclass\empty + \setupbodyfont[#1]% + \else + \switchtobodyfont[#1]% + \fullrestoreglobalbodyfont \fi} +\unexpanded\def\showbodyfontstate + {\dontleavehmode + \start + \infofont + [fontclass: \fontclass,\space + fontbody: \fontbody ,\space + fontface: \fontface ,\space + fontsize: \fontsize ]% + \stop} + %D Handy for manuals: %D The \type {\tochar} commmand takes a specification: |