summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/base/symb-glm.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/context/base/symb-glm.tex')
-rw-r--r--Master/texmf-dist/tex/context/base/symb-glm.tex77
1 files changed, 77 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/context/base/symb-glm.tex b/Master/texmf-dist/tex/context/base/symb-glm.tex
new file mode 100644
index 00000000000..cd7c05dbda2
--- /dev/null
+++ b/Master/texmf-dist/tex/context/base/symb-glm.tex
@@ -0,0 +1,77 @@
+%D \module
+%D [ file=symb-glm,
+%D version=2002.05.07,
+%D title=\CONTEXT\ Symbol Libraries,
+%D subtitle=Guillemots,
+%D author=Hans Hagen,
+%D date=\currentdate,
+%D copyright={PRAGMA / Hans Hagen \& Ton Otten}]
+%C
+%C This module is part of the \CONTEXT\ macro||package and is
+%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
+%C details.
+
+%D Watch the \type {x} before the local symbols.
+
+\loadmapfile [ec-public-lm.map]
+
+% this used to be:
+%
+% \definefontsynonym [GuilSerif] [plr10] [encoding=ec]
+% \definefontsynonym [GuilSerifBold] [plbx10] [encoding=ec]
+% \definefontsynonym [GuilSerifItalic] [plti10] [encoding=ec]
+% \definefontsynonym [GuilSerifSlanted] [plsl10] [encoding=ec]
+% \definefontsynonym [GuilSerifBoldItalic] [plbxti10] [encoding=ec]
+% \definefontsynonym [GuilSerifBoldSlanted] [plbxsl10] [encoding=ec]
+%
+% \definefontsynonym [GuilSans] [plss10] [encoding=ec]
+% \definefontsynonym [GuilSansBold] [plssbx10] [encoding=ec]
+% \definefontsynonym [GuilSansItalic] [plssi10] [encoding=ec]
+% \definefontsynonym [GuilSansSlanted] [plssi10] [encoding=ec]
+% \definefontsynonym [GuilSansBoldItalic] [plssbi10] [encoding=ec]
+% \definefontsynonym [GuilSansBoldSlanted] [plssbi10] [encoding=ec]
+%
+% \definefontsynonym [GuilMono] [pltt10] [encoding=ec]
+%
+% but was also one of the reasons for triggering the lm project, so:
+
+\definefontsynonym [GuilSerif] [cork-lmr10] [encoding=ec]
+\definefontsynonym [GuilSerifBold] [cork-lmbx10] [encoding=ec]
+\definefontsynonym [GuilSerifItalic] [cork-lmti10] [encoding=ec]
+\definefontsynonym [GuilSerifSlanted] [cork-lmsl10] [encoding=ec]
+\definefontsynonym [GuilSerifBoldItalic] [cork-lmbxti10] [encoding=ec]
+\definefontsynonym [GuilSerifBoldSlanted] [cork-lmbxsl10] [encoding=ec]
+
+\definefontsynonym [GuilSans] [cork-lmss10] [encoding=ec]
+\definefontsynonym [GuilSansBold] [cork-lmssbx10] [encoding=ec]
+\definefontsynonym [GuilSansItalic] [cork-lmssi10] [encoding=ec]
+\definefontsynonym [GuilSansSlanted] [cork-lmssi10] [encoding=ec]
+\definefontsynonym [GuilSansBoldItalic] [cork-lmssbi10] [encoding=ec]
+\definefontsynonym [GuilSansBoldSlanted] [cork-lmssbi10] [encoding=ec]
+
+\definefontsynonym [GuilMono] [cork-lmtt10] [encoding=ec]
+%definefontsynonym [GuilMonoBold] [cork-lmtt10] [encoding=ec]
+%definefontsynonym [GuilMonoSlanted] [cork-lmtt10] [encoding=ec]
+%definefontsynonym [GuilMonoItalic] [cork-lmtt10] [encoding=ec]
+%definefontsynonym [GuilMonoBoldItalic] [cork-lmtt10] [encoding=ec]
+%definefontsynonym [GuilMonoBoldSlanted] [cork-lmtt10] [encoding=ec]
+
+\definesymbol [xleftguillemot] [\getglyph{Guil}{\char19}]
+\definesymbol [xrightguillemot] [\getglyph{Guil}{\char20}]
+
+\definesymbol [xguilsingleleft] [\getglyph{Guil}{\char14}]
+\definesymbol [xguilsingleright] [\getglyph{Guil}{\char15}]
+
+%D A strange place, but okay (the \type {\relax} prevents space gobbling)
+
+\startencoding [default]
+
+ \definecharacter leftguillemot {\symbol[xleftguillemot]\relax}
+ \definecharacter rightguillemot {\symbol[xrightguillemot]\relax}
+
+ \definecharacter guilsingleleft {\symbol[xguilsingleleft]\relax}
+ \definecharacter guilsingleright {\symbol[xguilsingleright]\relax}
+
+\stopencoding
+
+\endinput