summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/metapost/context/base/mp-grph.mpiv
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/metapost/context/base/mp-grph.mpiv')
-rw-r--r--Master/texmf-dist/metapost/context/base/mp-grph.mpiv6
1 files changed, 5 insertions, 1 deletions
diff --git a/Master/texmf-dist/metapost/context/base/mp-grph.mpiv b/Master/texmf-dist/metapost/context/base/mp-grph.mpiv
index 30c49e6e04a..a3c057a98b5 100644
--- a/Master/texmf-dist/metapost/context/base/mp-grph.mpiv
+++ b/Master/texmf-dist/metapost/context/base/mp-grph.mpiv
@@ -139,7 +139,11 @@ def mfun_do_graphic_text (expr t) =
enddef ;
def mfun_no_graphic_text (expr t) text rest =
- draw unitsquare withprescript "gt_stage=trial" withpostscript t
+ currentgraphictext := currentgraphictext + 1 ;
+ draw unitsquare
+ withprescript "gt_stage=trial"
+ withprescript "gt_index=" & decimal currentgraphictext
+ withpostscript t
enddef ;
def mfun_finish_graphic_text text x_op_x =