pst-solides3d (27dec18)

git-svn-id: svn://tug.org/texlive/trunk@49520 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 9 insertions, 14 deletions

diff --git a/Master/texmf-dist/dvips/pst-solides3d/pst-solides3d.pro b/Master/texmf-dist/dvips/pst-solides3d/pst-solides3d.pro
index a18ceefa9aa..d65e0817167 100644
--- a/Master/texmf-dist/dvips/pst-solides3d/pst-solides3d.pro
+++ b/Master/texmf-dist/dvips/pst-solides3d/pst-solides3d.pro
@@ -1,9 +1,9 @@
 %!
 % PostScript prologue for pst-solides3d.tex.
-% Version 4.26, 2017/08/23
+% Version 4.27, 2018/12/27
 %
 %% COPYRIGHT 2009-2017 by Jean-Paul Vignault
-%% opacity changes by Herbert Voss
+%% opacity changes and fixes by Herbert Voss
 %%
 %% This program can be redistributed and/or modified under the terms
 %% of the LaTeX Project Public License Distributed from CTAN
@@ -10194,9 +10194,7 @@ end
    setfont
 } def
 
-/setTimes {
-   setTimesRoman
-} def
+/setTimes { setTimesRoman } def
 
 %% syntaxe : string x y cctext
 /cctext {
@@ -11209,16 +11207,13 @@ end
 } def
 
 /proj-pst-point {
-   [proj-args] length 0 eq {
-      xorigine yorigine /proj-args defpoint
-   } if
+   [proj-args] length 0 eq { xorigine yorigine /proj-args defpoint } if
    /projname where {
       pop
-      [proj-args proj-definition cvx exec]
-      dup 0 getp projname cvlit defpoint
-      dup length 2 gt {
-         1 getp projname (0) append cvlit defpoint
-      } if
+      [ proj-args proj-definition cvx exec ]
+      dup 0 getp 
+      projname cvlit defpoint
+      dup length 2 gt { 1 getp projname (0) append cvlit defpoint } if
       /projname where pop /projname undef
    } if
    proj-action (none) eqstring not {
@@ -11231,7 +11226,7 @@ end
 %   1 1 0 0 1 1 Diamond
    texte length 0 gt {
       proj-fontsize setfontsize
-%      setTimes   %%%%%%%%%%%%%%%%%%%%%%%%%%%
+      %setTimes 
       solidlinewidth setlinewidth
       newpath
       linecolor