summaryrefslogtreecommitdiff
path: root/metapost
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2021-03-02 20:22:41 +0100
committerContext Git Mirror Bot <phg@phi-gamma.net>2021-03-02 20:22:41 +0100
commit0d300509bdd7497fd376844b2326f5917636590e (patch)
tree7b3236d0be4e2e6f0dac1171fde560ed9b9c89e6 /metapost
parentd07afd7261f4bb5486cc016d8c90d532ba7fc0e4 (diff)
downloadcontext-0d300509bdd7497fd376844b2326f5917636590e.tar.gz
2021-03-02 19:20:00
Diffstat (limited to 'metapost')
-rw-r--r--metapost/context/base/mpxl/mp-luas.mpxl10
1 files changed, 10 insertions, 0 deletions
diff --git a/metapost/context/base/mpxl/mp-luas.mpxl b/metapost/context/base/mpxl/mp-luas.mpxl
index 9d013a790..b98305bba 100644
--- a/metapost/context/base/mpxl/mp-luas.mpxl
+++ b/metapost/context/base/mpxl/mp-luas.mpxl
@@ -307,3 +307,13 @@ def showproperty = runscript mfid_showproperty enddef ;
def showhashentry = runscript mfid_showhashentry enddef ;
permanent showproperty, showhashentry ;
+
+newscriptindex mfid_textextanchor ; mfid_textextanchor := scriptindex("textextanchor") ;
+
+def textextanchor = runscript mfid_textextanchor enddef ;
+
+vardef textextanchor(expr p) =
+ runscript mfid_textextanchor (prescriptpart p)
+enddef ;
+
+permanent textextanchor ;