From 5d6fff8fbf92d4ec1185bef63a353cefb80762e9 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Fri, 10 Sep 2021 21:02:44 +0000 Subject: pstricks (10sep21) git-svn-id: svn://tug.org/texlive/trunk@60466 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/dvips/pstricks/pstricks.pro | 22 ++++------------------ 1 file changed, 4 insertions(+), 18 deletions(-) (limited to 'Master/texmf-dist/dvips') diff --git a/Master/texmf-dist/dvips/pstricks/pstricks.pro b/Master/texmf-dist/dvips/pstricks/pstricks.pro index 91824e557c5..8587712fcee 100644 --- a/Master/texmf-dist/dvips/pstricks/pstricks.pro +++ b/Master/texmf-dist/dvips/pstricks/pstricks.pro @@ -1,7 +1,7 @@ -% $Id: pstricks.pro 191 2021-09-05 20:07:31Z herbert $ +% $Id: pstricks.pro 217 2021-09-10 13:50:31Z herbert $ % %% PostScript prologue for pstricks.tex. -%% Version 1.38, 2021/09/05 +%% Version 1.39, 2021/09/10 %% %% This program can be redistributed and/or modified under the terms %% of the LaTeX Project Public License Distributed from CTAN archives @@ -121,22 +121,6 @@ tx@Dict begin /startGlobal { true setglobal globaldict begin } bind def /endGlobal { end false setglobal } bind def % -/setpdfcolor where { % luapstricks specific code - /setpdfcolor get /pssetPDFcolor exch def - /setpdfcolor { - pssetPDFcolor - mark - currentcolor - currentcolorspace 0 get - dup /DeviceRGB eq { pop setrgbcolor } { - dup /DeviceCMYK eq { pop setcmykcolor } { - /DeviceGray eq { setgray } if - } ifelse - } ifelse - cleartomark - } def -} if -% /pssetRGBcolor /setrgbcolor load def /pssetCMYKcolor /setcmykcolor load def /pssetGraycolor /setgray load def @@ -721,9 +705,11 @@ tx@Dict begin /EAC { x2 y2 x y ArrowB curveto pop pop } def % /OpenCurve { + 5 dict begin NArray n 3 lt { n { pop pop } repeat } { BOC /n n 3 sub def n { NC } repeat EOC } ifelse + end } def % /CurvePath { -- cgit v1.2.3