summaryrefslogtreecommitdiff
path: root/metapost
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2021-05-31 14:38:45 +0200
committerContext Git Mirror Bot <phg@phi-gamma.net>2021-05-31 14:38:45 +0200
commit316fec3fcb4b5e6f352a3a58db1656e08659202c (patch)
tree29cbe6e3e21a683e586edeae37e277af1b075017 /metapost
parentc1f664df24bd6c6d1222d479e2f0f88856685990 (diff)
downloadcontext-316fec3fcb4b5e6f352a3a58db1656e08659202c.tar.gz
2021-05-31 14:12:00
Diffstat (limited to 'metapost')
-rw-r--r--metapost/context/base/mpxl/mp-luas.mpxl6
1 files changed, 6 insertions, 0 deletions
diff --git a/metapost/context/base/mpxl/mp-luas.mpxl b/metapost/context/base/mpxl/mp-luas.mpxl
index b98305bba..2313fbe09 100644
--- a/metapost/context/base/mpxl/mp-luas.mpxl
+++ b/metapost/context/base/mpxl/mp-luas.mpxl
@@ -317,3 +317,9 @@ vardef textextanchor(expr p) =
enddef ;
permanent textextanchor ;
+
+newscriptindex mfid_anchorxy ; mfid_anchorxy := scriptindex "anchorxy" ; def anchorxy(expr name, x, y) = runscript mfid_anchorxy name x y enddef ;
+newscriptindex mfid_anchorx ; mfid_anchorx := scriptindex "anchorx" ; def anchorx (expr name, x, y) = runscript mfid_anchorx name x y enddef ;
+newscriptindex mfid_anchory ; mfid_anchory := scriptindex "anchory" ; def anchory (expr name, x, y) = runscript mfid_anchory name x y enddef ;
+
+permanent anchorxy, anchorx, anchory ;