summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/metapost/context/base/mpiv/mp-mlib.mpiv
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2018-03-20 22:10:59 +0000
committerKarl Berry <karl@freefriends.org>2018-03-20 22:10:59 +0000
commit65d009a0596b194597f47531523addd3e64ed005 (patch)
treee13bd9beecf63e26491a66aa7a8fa702482f0067 /Master/texmf-dist/metapost/context/base/mpiv/mp-mlib.mpiv
parentd1a186333ced7b341e26877907343f08211199f7 (diff)
context [current] (20mar18)
git-svn-id: svn://tug.org/texlive/trunk@47050 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/metapost/context/base/mpiv/mp-mlib.mpiv')
-rw-r--r--Master/texmf-dist/metapost/context/base/mpiv/mp-mlib.mpiv42
1 files changed, 15 insertions, 27 deletions
diff --git a/Master/texmf-dist/metapost/context/base/mpiv/mp-mlib.mpiv b/Master/texmf-dist/metapost/context/base/mpiv/mp-mlib.mpiv
index 0638ee3e1c3..115fe63aeac 100644
--- a/Master/texmf-dist/metapost/context/base/mpiv/mp-mlib.mpiv
+++ b/Master/texmf-dist/metapost/context/base/mpiv/mp-mlib.mpiv
@@ -1245,33 +1245,21 @@ vardef properties(text t) =
image(draw unitcircle t)
enddef ;
-% if metapostversion < 1.770 :
-%
-% def withproperties expr p =
-% if colormodel p = 3 :
-% withcolor greypart p
-% elseif colormodel p = 5 :
-% withcolor (redpart p,greenpart p,bluepart p)
-% elseif colormodel p = 7 :
-% withcolor (cyanpart p,magentapart p,yellowpart p,blackpart p)
-% fi
-% enddef ;
-%
-% else :
-
- def withproperties expr p =
- if colormodel p = 3 :
- withcolor greypart p
- elseif colormodel p = 5 :
- withcolor (redpart p,greenpart p,bluepart p)
- elseif colormodel p = 7 :
- withcolor (cyanpart p,magentapart p,yellowpart p,blackpart p)
- fi
- withprescript prescriptpart p
- withpostscript postscriptpart p
- enddef ;
-
-% fi ;
+def withproperties expr p =
+ if colormodel p = 3 :
+ withcolor greypart p
+ elseif colormodel p = 5 :
+ withcolor (redpart p,greenpart p,bluepart p)
+ elseif colormodel p = 7 :
+ withcolor (cyanpart p,magentapart p,yellowpart p,blackpart p)
+ fi
+ withpen penpart p
+ % if dashpart p <> nullpicture : % fails
+ dashed dashpart p
+ % fi
+ withprescript prescriptpart p
+ withpostscript postscriptpart p
+enddef ;
% Experimental: