diff options
Diffstat (limited to 'metapost/context/base/mpiv/mp-mlib.mpiv')
| -rw-r--r-- | metapost/context/base/mpiv/mp-mlib.mpiv | 42 |
1 files changed, 15 insertions, 27 deletions
diff --git a/metapost/context/base/mpiv/mp-mlib.mpiv b/metapost/context/base/mpiv/mp-mlib.mpiv index 0638ee3e1..115fe63ae 100644 --- a/metapost/context/base/mpiv/mp-mlib.mpiv +++ b/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: |