diff options
Diffstat (limited to 'Master/texmf-dist/metapost/base/plain.mp')
| -rw-r--r-- | Master/texmf-dist/metapost/base/plain.mp | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/Master/texmf-dist/metapost/base/plain.mp b/Master/texmf-dist/metapost/base/plain.mp index bc0db8a57c1..52774f6fc67 100644 --- a/Master/texmf-dist/metapost/base/plain.mp +++ b/Master/texmf-dist/metapost/base/plain.mp @@ -1,8 +1,11 @@ +% $Id: plain.mp,v 1.3 2005/04/28 06:45:21 taco Exp $ +% Public domain. + % This file gives the macros for plain MetaPost % It contains all the features of plain METAFONT except those specific to % font-making. (See The METAFONTbook by D.E. Knuth). % There are also a number of macros for labeling figures, etc. -string base_name, base_version; base_name="plain"; base_version="0.64"; +string base_name, base_version; base_name="plain"; base_version="0.99"; message "Preloading the plain mem file, version "&base_version; @@ -473,10 +476,10 @@ enddef; def label = draw thelabel enddef; newinternal dotlabeldiam; dotlabeldiam:=3bp; -vardef dotlabel@#(expr s,z) = - label@#(s,z); +vardef dotlabel@#(expr s,z) text t_ = + label@#(s,z) t_; interim linecap:=rounded; - draw z withpen pencircle scaled dotlabeldiam; + draw z withpen pencircle scaled dotlabeldiam t_; enddef; def makelabel = dotlabel enddef; |