diff options
| author | Hans Hagen <pragma@wxs.nl> | 2021-05-31 14:38:45 +0200 | 
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2021-05-31 14:38:45 +0200 | 
| commit | 316fec3fcb4b5e6f352a3a58db1656e08659202c (patch) | |
| tree | 29cbe6e3e21a683e586edeae37e277af1b075017 /metapost | |
| parent | c1f664df24bd6c6d1222d479e2f0f88856685990 (diff) | |
| download | context-316fec3fcb4b5e6f352a3a58db1656e08659202c.tar.gz | |
2021-05-31 14:12:00
Diffstat (limited to 'metapost')
| -rw-r--r-- | metapost/context/base/mpxl/mp-luas.mpxl | 6 | 
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 ;  | 
