summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/generic/pst-slpe/pst-slpe.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/source/generic/pst-slpe/pst-slpe.dtx')
-rw-r--r--Master/texmf-dist/source/generic/pst-slpe/pst-slpe.dtx18
1 files changed, 9 insertions, 9 deletions
diff --git a/Master/texmf-dist/source/generic/pst-slpe/pst-slpe.dtx b/Master/texmf-dist/source/generic/pst-slpe/pst-slpe.dtx
index a0717360da9..8aa6f2ac5b8 100644
--- a/Master/texmf-dist/source/generic/pst-slpe/pst-slpe.dtx
+++ b/Master/texmf-dist/source/generic/pst-slpe/pst-slpe.dtx
@@ -9,6 +9,7 @@
%% in directory macros/latex/base/lppl.txt.
%%
%\fi
+% \changes{v1.31}{2011/10/25}{ fix bug in psball (hv)}
% \changes{v1.3}{2008/09/20}{ fading option (hv)}
% \changes{v1.2}{2008/06/19}{ \textbackslash psBall (hv)}
% \changes{v1.1}{2006/06/19}{%
@@ -65,14 +66,14 @@
%
%\iffalse
%<*!prolog>
-\def\pstslpefileversion{1.3}
-\def\pstslpefiledate{2008/09/20}
+\def\pstslpefileversion{1.31}
+\def\pstslpefiledate{2011/10/25}
%</!prolog>
%\fi
%
% \title{\textsf{pst-slpe} package \\ version \pstslpefileversion}
% \author{Martin Giese\footnote{\texttt{giese@ira.uka.de}} and
-% Herbert Vo\ss\footnote{\texttt{voss@pstricks.de}}}
+% Herbert Vo\ss\footnote{\texttt{hvoss@tug.org}}}
% \date{\pstslpefiledate}
% \maketitle
%
@@ -659,17 +660,16 @@
% \begin{macrocode}
\def\psBall{\pst@object{psBall}}
\def\psBall@i{\@ifnextchar(\psBall@ii{\psBall@ii(0,0)}}
-\def\psBall@ii(#1,#2)#3#4{%
+\def\psBall@ii(#1,#2)#3#4{{%
\pst@killglue
- \pst@dima=#4%
- \pst@dimb=#4%
+ \pssetlength\pst@dima{#4}%%%%% 20111025 hv
+ \pst@dimb=\pst@dima%%%%%%%%%%% 20111025 hv
\advance\pst@dima by 0.075\pst@dimb%
- \begingroup%
\addbefore@par{sloperadius=\the\pst@dima,fillstyle=ccslope,
- slopebegin=white,slopeend=#3,slopecenter=0.4 0.6,linestyle=none}%
+ slopebegin=white,slopeend=#3,slopecenter=0.4 0.6,linestyle=none}%
\use@par%
\pscircle(#1,#2){#4}%
- \endgroup\ignorespaces%
+ }\ignorespaces%
}
% \end{macrocode}
% \end{macro}