diff options
author | Hans Hagen <pragma@wxs.nl> | 2009-06-02 09:30:00 +0200 |
---|---|---|
committer | Hans Hagen <pragma@wxs.nl> | 2009-06-02 09:30:00 +0200 |
commit | 40e5e0f114c759b17af50cde80677a9612d4d41b (patch) | |
tree | 298cb442e1d4f8352e10278ccf7e8b105d98f922 /metapost/context/base/mp-tool.mp | |
parent | 1d3090326210c6e6f7ec5432799ded25b75bba46 (diff) | |
download | context-40e5e0f114c759b17af50cde80677a9612d4d41b.tar.gz |
beta 2009.06.02 09:30
Diffstat (limited to 'metapost/context/base/mp-tool.mp')
-rw-r--r-- | metapost/context/base/mp-tool.mp | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/metapost/context/base/mp-tool.mp b/metapost/context/base/mp-tool.mp index 817f237b0..3ba5923ea 100644 --- a/metapost/context/base/mp-tool.mp +++ b/metapost/context/base/mp-tool.mp @@ -1054,6 +1054,12 @@ enddef ; let normaldraw = draw ; let normalfill = fill ; +% bugged in mplib so ... + +def normalfill expr c = addto currentpicture contour c _op_ enddef ; +def normaldraw expr p = addto currentpicture if picture p: also p else: doublepath p withpen currentpen fi _op_ enddef ; + + def drawlineoptions (text t) = def _lin_opt_ = t enddef ; enddef ; def drawpointoptions (text t) = def _pnt_opt_ = t enddef ; enddef ; def drawcontroloptions(text t) = def _ctr_opt_ = t enddef ; enddef ; |