summaryrefslogtreecommitdiff
path: root/metapost/context/base/mp-mlib.mp
diff options
context:
space:
mode:
Diffstat (limited to 'metapost/context/base/mp-mlib.mp')
-rw-r--r--metapost/context/base/mp-mlib.mp5
1 files changed, 5 insertions, 0 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 ;