From ac074df1b1f183f54be4086757cb2b85417fc903 Mon Sep 17 00:00:00 2001 From: Marius Date: Thu, 30 Jan 2014 01:00:16 +0200 Subject: beta 2014.01.29 23:48 --- metapost/context/base/mp-base.mpii | 2 +- metapost/context/base/mp-tool.mpii | 4 +++- 2 files changed, 4 insertions(+), 2 deletions(-) (limited to 'metapost') 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 ; -- cgit v1.2.3