summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/fonts/source
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2015-08-17 22:15:43 +0000
committerKarl Berry <karl@freefriends.org>2015-08-17 22:15:43 +0000
commitc970c7a71b932db2126f7e23ee447c74de7d6d81 (patch)
tree093112a1adf4051a817f5d998b94a5d7f8c5b1d4 /Master/texmf-dist/fonts/source
parent89eb79f950acbfcb719804f82708f8a49c788c70 (diff)
drm (17aug15)
git-svn-id: svn://tug.org/texlive/trunk@38136 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/fonts/source')
-rw-r--r--Master/texmf-dist/fonts/source/public/drm/drmpunct.mf38
1 files changed, 8 insertions, 30 deletions
diff --git a/Master/texmf-dist/fonts/source/public/drm/drmpunct.mf b/Master/texmf-dist/fonts/source/public/drm/drmpunct.mf
index 14ad2b81521..71d0556b007 100644
--- a/Master/texmf-dist/fonts/source/public/drm/drmpunct.mf
+++ b/Master/texmf-dist/fonts/source/public/drm/drmpunct.mf
@@ -3,7 +3,7 @@
% her and the Immaculate Heart of Mary for their prayers,
% and to the Sacred Heart of Jesus for His mercy.
-picture hyphen;
+path hyphenpath;
picture paren;
picture period;
picture opendoublequote;
@@ -61,50 +61,28 @@ define_pixels(thinwid);
beginchar("-",2pwid#,ex#,0); "The hyphen, -";
-z0 = (ss,3h/4);
+z0 = (ss,h/2);
z1 = (w-ss,y0);
z2 = z0 shifted (thinwid/2,thinwid/2);
z3 = z2 shifted (0,-thinwid);
z4 = z1 shifted (-thinwid/2,thinwid/2);
z5 = z4 shifted (0,-thinwid);
-fill z2..z0..z3--z5..z1..z4--cycle;
-
-hyphen := currentpicture;
-
+hyphenpath = z2..z0..z3--z5..z1..z4--cycle;
+fill hyphenpath;
penlabels(0,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);
endchar;
-beginchar(oct"177",2pwid#,ex#,0); "The break hyphen, -";
-currentpicture := hyphen;
+beginchar(oct"177",1.5pwid#,ex#,0); "The break hyphen, -";
+fill hyphenpath xscaled 0.75;
endchar;
beginchar(oct"025",3pwid#,ex#,0); "The en-dash, --";
-
-z0 = (ss,3h/4);
-z1 = (w-ss,y0);
-z2 = z0 shifted (thinwid/2,thinwid/2);
-z3 = z2 shifted (0,-thinwid);
-z4 = z1 shifted (-thinwid/2,thinwid/2);
-z5 = z4 shifted (0,-thinwid);
-
-fill z2..z0..z3--z5..z1..z4--cycle;
-
-penlabels(0,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);
+fill hyphenpath xscaled 1.5;
endchar;
beginchar(oct"026",em#+2ss#,ex#,0); "The em-dash, ---";
-
-z0 = (ss,3h/4);
-z1 = (w-ss,y0);
-z2 = z0 shifted (thinwid/2,thinwid/2);
-z3 = z2 shifted (0,-thinwid);
-z4 = z1 shifted (-thinwid/2,thinwid/2);
-z5 = z4 shifted (0,-thinwid);
-
-fill z2..z0..z3--z5..z1..z4--cycle;
-
-penlabels(0,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);
+fill hyphenpath xscaled 2;
endchar;
beginchar("(",1.5pwid#,cap#,dep#); "The open parenthesis, (";