diff options
author | Marius <mariausol@gmail.com> | 2013-11-10 13:40:13 +0200 |
---|---|---|
committer | Marius <mariausol@gmail.com> | 2013-11-10 13:40:13 +0200 |
commit | 7425449d374a84cde533bdb2ce5c76c62c1eb48c (patch) | |
tree | b48535e1957ef4da706efc896ff2f0cac64c2151 /metapost | |
parent | b061ca19f9a8721105957f51448400425adaf7e8 (diff) | |
download | context-7425449d374a84cde533bdb2ce5c76c62c1eb48c.tar.gz |
beta 2013.11.10 12:23
Diffstat (limited to 'metapost')
-rw-r--r-- | metapost/context/base/mp-grph.mpiv | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/metapost/context/base/mp-grph.mpiv b/metapost/context/base/mp-grph.mpiv index 30c49e6e0..a3c057a98 100644 --- a/metapost/context/base/mp-grph.mpiv +++ b/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 = |