summaryrefslogtreecommitdiff
path: root/tex/context/base/font-sym.mkvi
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/font-sym.mkvi')
-rw-r--r--tex/context/base/font-sym.mkvi18
1 files changed, 11 insertions, 7 deletions
diff --git a/tex/context/base/font-sym.mkvi b/tex/context/base/font-sym.mkvi
index c8ca49f74..a21bea0ba 100644
--- a/tex/context/base/font-sym.mkvi
+++ b/tex/context/base/font-sym.mkvi
@@ -110,12 +110,14 @@
%D The next macro can be used to make decisions based on the shape:
-\def\doifitalicelse#yes#nop%
+\def\doifelseitalic#yes#nop%
{\ifx\fontalternative\s!sl#yes\else
\ifx\fontalternative\s!it#yes\else
\ifx\fontalternative\s!bs#yes\else
\ifx\fontalternative\s!bi#yes\else#nop\fi\fi\fi\fi}
+\let\doifitalicelse\doifelseitalic
+
%D For an example of usage of the following command,
%D see \type {cont-log.tex}.
%D
@@ -167,15 +169,15 @@
\currentsymbolfont
\global\expandafter\let\csname\??symbolfont\askedsymbolfont\endcsname\lastrawfontcall}
-\unexpanded\def\getnamedglyphstyled#fontname#character{{\setstyledsymbolicfont{#fontname}\ctxcommand{fontchar("#character")}}}
-\unexpanded\def\getnamedglyphdirect#fontname#character{{\setdirectsymbolicfont{#fontname}\ctxcommand{fontchar("#character")}}}
-\unexpanded\def\getglyphstyled #fontname#character{{\setstyledsymbolicfont{#fontname}\doifnumberelse{#character}\char\donothing#character}}
-\unexpanded\def\getglyphdirect #fontname#character{{\setdirectsymbolicfont{#fontname}\doifnumberelse{#character}\char\donothing#character}}
+\unexpanded\def\getnamedglyphstyled#fontname#character{{\setstyledsymbolicfont{#fontname}\clf_fontchar{#character}}}
+\unexpanded\def\getnamedglyphdirect#fontname#character{{\setdirectsymbolicfont{#fontname}\clf_fontchar{#character}}}
+\unexpanded\def\getglyphstyled #fontname#character{{\setstyledsymbolicfont{#fontname}\doifelsenumber{#character}\char\donothing#character}}
+\unexpanded\def\getglyphdirect #fontname#character{{\setdirectsymbolicfont{#fontname}\doifelsenumber{#character}\char\donothing#character}}
% this one is wrong:
\unexpanded\def\getscaledglyph#scale#name#content%
- {{\setscaledstyledsymbolicfont\fontbody{#scale}{#name}\doifnumberelse{#content}\char\donothing#content}}
+ {{\setscaledstyledsymbolicfont\fontbody{#scale}{#name}\doifelsenumber{#content}\char\donothing#content}}
\let\getglyph \getglyphstyled % old
\let\getrawglyph \getglyphdirect % old
@@ -234,7 +236,7 @@
%D \macros{doiffontcharelse}
-\unexpanded\def\doiffontcharelse#specification#unicode% this could be a direct lua call
+\unexpanded\def\doifelsefontchar#specification#unicode% this could be a direct lua call
{\begingroup
\font_basics_define_font_without_parameters{thedefinedfont}{#specification}%
\iffontchar\font#unicode\relax
@@ -243,4 +245,6 @@
\endgroup\expandafter\secondoftwoarguments
\fi}
+\let\doiffontcharelse\doifelsefontchar
+
\protect \endinput