diff options
Diffstat (limited to 'metapost')
| -rw-r--r-- | metapost/context/base/mp-base.mpii | 2 | ||||
| -rw-r--r-- | metapost/context/base/mp-tool.mpii | 4 |
2 files changed, 4 insertions, 2 deletions
diff --git a/metapost/context/base/mp-base.mpii b/metapost/context/base/mp-base.mpii index addaa86db..7af4bc436 100644 --- a/metapost/context/base/mp-base.mpii +++ b/metapost/context/base/mp-base.mpii @@ -110,7 +110,7 @@ transform identity; for z=origin,right,up: z transformed identity = z; endfor % color constants -color black, white, red, green, blue, background; +color black, white, red, green, blue, cyan, magenta, yellow, background; black = (0,0,0); white = (1,1,1); red = (1,0,0); diff --git a/metapost/context/base/mp-tool.mpii b/metapost/context/base/mp-tool.mpii index 492dec44c..62bd122f5 100644 --- a/metapost/context/base/mp-tool.mpii +++ b/metapost/context/base/mp-tool.mpii @@ -28,6 +28,8 @@ let @## = @# ; if not known mpversion : string mpversion ; mpversion := "0.641" ; fi ; +newinternal metapostversion ; metapostversion := scantokens(mpversion) ; + % vardef mpversiongt(expr s) = % scantokens (mpversion & " > " & if numeric s : decimal s else : s fi) % enddef ; @@ -1128,7 +1130,7 @@ enddef ; % save arrowpath ; path arrowpath ; arrowpath := p ; % _drawarrowpath_ % enddef ; -% +% % def _drawarrowpath_ text t = % drawarrow arrowpath _pth_opt_ t ; % endgroup ; |