diff options
| author | Context Git Mirror Bot <phg42.2a@gmail.com> | 2016-02-24 12:15:08 +0100 |
|---|---|---|
| committer | Context Git Mirror Bot <phg42.2a@gmail.com> | 2016-02-24 12:15:08 +0100 |
| commit | 33e29b1ba0661b0f58605749528362a0e12eae52 (patch) | |
| tree | d9c1ceebec1f4869ffa0bdeafbeef390cb916525 /metapost/context/base/mpiv/mp-tool.mpiv | |
| parent | a3170089e0016cfc0489c433d9113d94b9ce3d67 (diff) | |
| download | context-33e29b1ba0661b0f58605749528362a0e12eae52.tar.gz | |
2016-02-24 11:22:00
Diffstat (limited to 'metapost/context/base/mpiv/mp-tool.mpiv')
| -rw-r--r-- | metapost/context/base/mpiv/mp-tool.mpiv | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/metapost/context/base/mpiv/mp-tool.mpiv b/metapost/context/base/mpiv/mp-tool.mpiv index caefcb643..97403f69a 100644 --- a/metapost/context/base/mpiv/mp-tool.mpiv +++ b/metapost/context/base/mpiv/mp-tool.mpiv @@ -1395,11 +1395,17 @@ enddef; % draw arrowhead _apth t ; % enddef; +% def _finarr text t = +% if autoarrows : set_ahlength (t) fi ; +% draw arrowpath _apth t ; % arrowpath added +% fill arrowhead _apth t ; +% draw arrowhead _apth t undashed ; +% enddef; + def _finarr text t = if autoarrows : set_ahlength (t) fi ; draw arrowpath _apth t ; % arrowpath added - fill arrowhead _apth t ; - draw arrowhead _apth t undashed ; + both arrowhead _apth t ; enddef; %D Handy too ...... |