summaryrefslogtreecommitdiff
path: root/metapost/context/base/mpxl/mp-base.mpxl
diff options
context:
space:
mode:
Diffstat (limited to 'metapost/context/base/mpxl/mp-base.mpxl')
-rw-r--r--metapost/context/base/mpxl/mp-base.mpxl5
1 files changed, 4 insertions, 1 deletions
diff --git a/metapost/context/base/mpxl/mp-base.mpxl b/metapost/context/base/mpxl/mp-base.mpxl
index 4cb44d69f..afdcda1ed 100644
--- a/metapost/context/base/mpxl/mp-base.mpxl
+++ b/metapost/context/base/mpxl/mp-base.mpxl
@@ -993,7 +993,9 @@ string extra_beginfig, extra_endfig ;
extra_beginfig := "" ;
extra_endfig := "" ;
-def beginfig(expr c) =
+newinternal boolean makingfigure ; makingfigure := false ;
+
+def beginfig(expr c) = % redefined in mp-grph !
begingroup
charcode := c ;
clearxy ;
@@ -1002,6 +1004,7 @@ def beginfig(expr c) =
pickup defaultpen ;
drawoptions() ;
interim stacking := 0 ;
+ interim makingfigure := true;
scantokens extra_beginfig ;
enddef ;