diff options
author | Hans Hagen <pragma@wxs.nl> | 2009-06-04 22:20:00 +0200 |
---|---|---|
committer | Hans Hagen <pragma@wxs.nl> | 2009-06-04 22:20:00 +0200 |
commit | 2ccf824cf6614b771c4dd47bd09e7d4f1a59f271 (patch) | |
tree | a757114aa5d23f13d459b6319c36c1cb4fe2611a /metapost | |
parent | e9990ae7c22295e59c1d2c80c7e2717738b5c120 (diff) | |
download | context-2ccf824cf6614b771c4dd47bd09e7d4f1a59f271.tar.gz |
beta 2009.06.04 22:20
Diffstat (limited to 'metapost')
-rw-r--r-- | metapost/context/base/mp-mlib.mp | 5 | ||||
-rw-r--r-- | metapost/context/base/mp-tool.mp | 9 |
2 files changed, 9 insertions, 5 deletions
diff --git a/metapost/context/base/mp-mlib.mp b/metapost/context/base/mp-mlib.mp index aeacb3e9c..bf2372ca3 100644 --- a/metapost/context/base/mp-mlib.mp +++ b/metapost/context/base/mp-mlib.mp @@ -165,6 +165,8 @@ vardef thelabel@#(expr s, z) = p shifted (z + labeloffset*laboff@# - (labxf@#*lrcorner p + labyf@#*ulcorner p + (1-labxf@#-labyf@#)*llcorner p)) enddef; +let normalinfont = infont ; + primarydef str infont name = % very naughty ! if name = "" : textext(str) @@ -257,6 +259,9 @@ enddef ; def erasegraphictextfile = enddef ; +def externalfigure primary filename = + doexternalfigure (filename) +enddef ; def doexternalfigure (expr filename) text transformation = draw unitsquare transformation withprescript "fg" withpostscript filename ; enddef ; diff --git a/metapost/context/base/mp-tool.mp b/metapost/context/base/mp-tool.mp index 31074911f..8cc6d1f89 100644 --- a/metapost/context/base/mp-tool.mp +++ b/metapost/context/base/mp-tool.mp @@ -1288,7 +1288,10 @@ extra_endfig := extra_endfig & " naturalizepaths ; " ; %D Also handy: -extra_beginfig := extra_beginfig & " truecorners := 0 ; " ; % restores +extra_beginfig := extra_beginfig & " truecorners := 0 ; " ; % restores +extra_beginfig := extra_beginfig & " miterlimit := 10 ; " ; % restores +extra_beginfig := extra_beginfig & " linejoin := rounded ; " ; % restores +extra_beginfig := extra_beginfig & " linecap := rounded ; " ; % restores %D Normally, arrowheads don't scale well. So we provide a %D hack. @@ -2570,7 +2573,3 @@ enddef ; % done endinput ; - -end - -end |