blob: 89b1de730e40fb0025d77f0c0ed17e9a5066587c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
|
%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 {met} instead of \type {mot}!
\loadmapfile [pl0-ams-cmr]
\definefontsynonym [GuilSerif] [plr10] [encoding=pl0]
\definefontsynonym [GuilSerifBold] [plbx10] [encoding=pl0]
\definefontsynonym [GuilSerifItalic] [plti10] [encoding=pl0]
\definefontsynonym [GuilSerifSlanted] [plsl10] [encoding=pl0]
\definefontsynonym [GuilSerifBoldItalic] [plbxti10] [encoding=pl0]
\definefontsynonym [GuilSerifBoldSlanted] [plbxsl10] [encoding=pl0]
\definefontsynonym [GuilSans] [plss10] [encoding=pl0]
\definefontsynonym [GuilSansBold] [plssbx10] [encoding=pl0]
\definefontsynonym [GuilSansItalic] [plssi10] [encoding=pl0]
\definefontsynonym [GuilSansSlanted] [plssi10] [encoding=pl0]
\definefontsynonym [GuilSansBoldItalic] [plssbi10] [encoding=pl0]
\definefontsynonym [GuilSansBoldSlanted] [plssbi10] [encoding=pl0]
\definefontsynonym [GuilMono] [pltt10] [encoding=pl0]
%definefontsynonym [GuilMonoBold] [pltt10] [encoding=pl0]
%definefontsynonym [GuilMonoSlanted] [pltt10] [encoding=pl0]
%definefontsynonym [GuilMonoItalic] [pltt10] [encoding=pl0]
%definefontsynonym [GuilMonoBoldItalic] [pltt10] [encoding=pl0]
%definefontsynonym [GuilMonoBoldSlanted] [pltt10] [encoding=pl0]
\definesymbol [leftguillemet] [\getglyph{Guil}{\char174}]
\definesymbol [rightguillemet] [\getglyph{Guil}{\char175}]
%D A strange place, but okay:
\startencoding [default]
\definecharacter leftguillemot {\symbol[leftguillemet]}
\definecharacter rightguillemot {\symbol[rightguillemet]}
\definecharacter guilsingleleft {\symbol[leftguillemet]}
\definecharacter guilsingleright {\symbol[rightguillemet]}
\stopencoding
\endinput
|