5 files changed, 23 insertions, 23 deletions
diff --git a/Master/texmf-dist/doc/generic/pst-slpe/Changes b/Master/texmf-dist/doc/generic/pst-slpe/Changes
index fe862ade686..42cdb6a41c3 100644
--- a/Master/texmf-dist/doc/generic/pst-slpe/Changes
+++ b/Master/texmf-dist/doc/generic/pst-slpe/Changes
@@ -1,12 +1,13 @@
 pst-slpe.tex --------
-1.3 2008/08/20 added fading style (hv)
-1.2 2008/06/19 \textbackslash psBall (hv)
-1.1 2006/06/19 using the extended pst-xkey 
+1.31 2011/10/25 fix bug with \psBall (hv)
+1.3  2008/08/20 added fading style (hv)
+1.2  2008/06/19 \textbackslash psBall (hv)
+1.1  2006/06/19 using the extended pst-xkey 
 	       instead of the old pst-key package; 
 	       creating a dtx file (hv)
-1.0 2005/03/05 More compatible to the other PStricks 
+1.0  2005/03/05 More compatible to the other PStricks 
 	       packages. (RN)
 
 
 pst-slpe.pro --------
-1.3 2008/08/20 added fading style (hv)
+1.3  2008/08/20 added fading style (hv)
diff --git a/Master/texmf-dist/doc/generic/pst-slpe/pst-slpe.pdf b/Master/texmf-dist/doc/generic/pst-slpe/pst-slpe.pdf
index da15c1acdbe..20fb2299939 100644
--- a/Master/texmf-dist/doc/generic/pst-slpe/pst-slpe.pdf
+++ b/Master/texmf-dist/doc/generic/pst-slpe/pst-slpe.pdf
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}
diff --git a/Master/texmf-dist/tex/generic/pst-slpe/pst-slpe.tex b/Master/texmf-dist/tex/generic/pst-slpe/pst-slpe.tex
index 870cf8480cb..b47e3b4eb73 100644
--- a/Master/texmf-dist/tex/generic/pst-slpe/pst-slpe.tex
+++ b/Master/texmf-dist/tex/generic/pst-slpe/pst-slpe.tex
@@ -24,8 +24,8 @@
 %% of the LaTeX Project Public License Distributed from CTAN archives
 %% in directory macros/latex/base/lppl.txt.
 %%
-\def\pstslpefileversion{1.3}
-\def\pstslpefiledate{2008/09/20}
+\def\pstslpefileversion{1.31}
+\def\pstslpefiledate{2011/10/25}
 \message{ v\pstslpefileversion, \pstslpefiledate}
 \csname PstSlopeLoaded\endcsname
 \let\PstSlopeLoaded\endinput
@@ -116,17 +116,16 @@
   tx@PstSlopeDict begin RadSlopesFill end}}
 \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}%
   \use@par%
   \pscircle(#1,#2){#4}%
-  \endgroup\ignorespaces%
+  }\ignorespaces%
 }
 \catcode`\@=\TheAtCode\relax
 \endinput
diff --git a/Master/texmf-dist/tex/latex/pst-slpe/pst-slpe.sty b/Master/texmf-dist/tex/latex/pst-slpe/pst-slpe.sty
index a504703834b..6b3df07ecd0 100644
--- a/Master/texmf-dist/tex/latex/pst-slpe/pst-slpe.sty
+++ b/Master/texmf-dist/tex/latex/pst-slpe/pst-slpe.sty
@@ -24,8 +24,8 @@
 %% of the LaTeX Project Public License Distributed from CTAN archives
 %% in directory macros/latex/base/lppl.txt.
 %%
-\def\pstslpefileversion{1.3}
-\def\pstslpefiledate{2008/09/20}
+\def\pstslpefileversion{1.31}
+\def\pstslpefiledate{2011/10/25}
 \RequirePackage{pstricks}
 \ProvidesPackage{pst-slpe}[2005/03/05 package wrapper for `pst-slpe.tex']
 \input{pst-slpe.tex}