summaryrefslogtreecommitdiff
path: root/metapost
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2013-10-15 13:52:00 +0200
committerHans Hagen <pragma@wxs.nl>2013-10-15 13:52:00 +0200
commit5add344c25ed29ba5881a161fce50d7dfa27948f (patch)
tree1a429030eb34aed25e758a62c0c8aeb79a50c4ab /metapost
parent103a839f3e920a1c91e3a7931a6d08c5262eeb2a (diff)
downloadcontext-5add344c25ed29ba5881a161fce50d7dfa27948f.tar.gz
beta 2013.10.15 13:52
Diffstat (limited to 'metapost')
-rw-r--r--metapost/context/base/mp-tool.mpiv16
1 files changed, 11 insertions, 5 deletions
diff --git a/metapost/context/base/mp-tool.mpiv b/metapost/context/base/mp-tool.mpiv
index bb5ae288e..672a051c2 100644
--- a/metapost/context/base/mp-tool.mpiv
+++ b/metapost/context/base/mp-tool.mpiv
@@ -331,6 +331,12 @@ vardef asinh primary x = ln(x+(x++1)) enddef ;
vardef sinh primary x = save xx ; xx = exp x ; (xx-1/xx)/2 enddef ;
vardef cosh primary x = save xx ; xx = exp x ; (xx+1/xx)/2 enddef ;
+%D Sometimes this is handy:
+
+def undashed =
+ dashed nullpicture
+enddef ;
+
%D We provide two macros for drawing stripes across a shape.
%D The first method (with the n suffix) uses another method,
%D slower in calculation, but more efficient when drawn. The
@@ -1272,12 +1278,12 @@ def _finarr text t =
draw arrowhead _apth t ;
enddef;
-def _findarr text t =
+def _finarr text t =
if autoarrows : set_ahlength (t) fi ;
- draw arrowpath _apth t ;
- fill arrowhead _apth withpen currentpen t ;
- fill arrowhead reverse _apth withpen currentpen t ;
-enddef ;
+ draw arrowpath _apth t ; % arrowpath added
+ fill arrowhead _apth t ;
+ draw arrowhead _apth t undashed ;
+enddef;
%D Handy too ......