diff options
author | Hans Hagen <pragma@wxs.nl> | 2019-02-22 20:29:46 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2019-02-22 20:29:46 +0100 |
commit | 7b271baae19db1528fbe6621bdf50af89a5a336b (patch) | |
tree | 4fc24a8f2be20aa90e90f6e1bcb62d69f4946235 /metapost/context/base/mpiv/mp-node.mpiv | |
parent | 67b9965fe473d18f13ed4c40f1e4e008eb870322 (diff) | |
download | context-7b271baae19db1528fbe6621bdf50af89a5a336b.tar.gz |
2019-02-22 19:43:00
Diffstat (limited to 'metapost/context/base/mpiv/mp-node.mpiv')
-rw-r--r-- | metapost/context/base/mpiv/mp-node.mpiv | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/metapost/context/base/mpiv/mp-node.mpiv b/metapost/context/base/mpiv/mp-node.mpiv index 79391220b..5829558e6 100644 --- a/metapost/context/base/mpiv/mp-node.mpiv +++ b/metapost/context/base/mpiv/mp-node.mpiv @@ -53,6 +53,8 @@ vardef makenode@#(text t) = for a = t : if (path a) or (unknown a) : mfun_makenode@#(t,) + elseif (string a) and (length(a) = 0) : + mfun_makenode@#(t,) else : mfun_makenode@#(nodepath, t,) fi @@ -64,6 +66,8 @@ vardef node@#(text t) = for a = t : if (path a) or (unknown a) : mfun_node@#(t,) + elseif (string a) and (length(a) = 0) : + mfun_node@#(t,) else : mfun_node@#(nodepath, t,) fi @@ -75,6 +79,8 @@ vardef nodeboundingpoint@#(text t) = for a = t : if (path a) or (unknown a) : mfun_nodeboundingpoint@#(t) + elseif (string a) and (length(a) = 0) : + mfun_nodeboundingpoint@#(t) else : mfun_nodeboundingpoint@#(nodepath,a) fi @@ -231,7 +237,7 @@ vardef betweennodes@#(suffix p)(expr f)(suffix q)(text s) = for a = s : if unknown t : t = a ; - nodeboundingpoint@#(q,t) + nodeboundingpoint@#(p,f) + mfun_nodeboundingpoint@#(q,t) + mfun_nodeboundingpoint@#(p,f) else : + relative@#(a) fi |