pstricks-add 3.45 (3nov10)

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

1 files changed, 18 insertions, 21 deletions

diff --git a/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex b/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex
index 6dd69d86909..7b68855d1de 100644
--- a/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex
+++ b/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex
@@ -1,4 +1,4 @@
-%% $Id: pstricks-add.tex 376 2010-08-28 15:40:17Z herbert $
+%% $Id: pstricks-add.tex 412 2010-11-03 19:39:07Z herbert $
 %%
 %%
 %% This is file `pstricks-add.tex',
@@ -31,8 +31,8 @@
 \ifx\PSTXKeyLoaded\endinput\else  \input pst-xkey \fi
 \ifx\PSTmathLoaded\endinput\else  \input pst-math \fi
 %
-\def\fileversion{3.44}
-\def\filedate{2010/08/28}
+\def\fileversion{3.45}
+\def\filedate{2010/11/03}
 \message{`pstricks-add' v\fileversion, \filedate\space (dr,hv)}
 %
 \edef\PstAtCode{\the\catcode`\@} \catcode`\@=11\relax
@@ -755,27 +755,24 @@
 }>
 %
 \def\parseRP#1;#2;#3\@nil{%check whether arg of refpt contains ;
-\def\arg@A{#1}\def\arg@B{#2}%
-%\ifx\arg@B\@empty\let\uflag\@empty\else\edef\uflag{1}\fi%
-}%
+  \def\arg@A{#1}\def\arg@B{#2}}
+%
 \def\Put{\pst@object{Put}}%
 \def\Put@i{\@ifnextchar({\Put@ii{}}{\Put@ii}}%  
 \def\Put@ii#1(#2)#3{{%
-\pst@killglue%
-\use@par%
-\expandafter\parseRP#1;;\@nil%sets \arg@A, \arg@B
-\ifx\arg@B\@empty% use \rput
-  \edef\arg@A{\if@star*\fi%
-  \ifx\arg@A\@empty\else[\arg@A]\fi%
-  }%
-  \edef\pst@tempA{\noexpand\rput\arg@A(#2){\noexpand#3}}\pst@tempA%
-\else% use \uput
-  \edef\arg@A{\if@star*\fi%
-  \ifx\arg@A\@empty\else{\arg@A}\fi%
-  \ifx\arg@B\@empty[0]\else[\arg@B]\fi%
-  }%
-  \edef\pst@tempA{\noexpand\uput\arg@A(#2){\noexpand#3}}\pst@tempA%
-\fi}\ignorespaces}%
+  \pst@killglue%
+  \use@par%
+  \expandafter\parseRP#1;;\@nil%sets \arg@A, \arg@B
+  \ifx\arg@B\@empty% use \rput
+    \edef\arg@A{\if@star*\fi\ifx\arg@A\@empty\else[\arg@A]\fi}%
+    \expandafter\rput\arg@A(>#2){#3}
+  \else% use \uput
+    \edef\arg@A{\if@star*\fi%
+      \ifx\arg@A\@empty\else{\arg@A}\fi%
+      \ifx\arg@B\@empty[0]\else[\arg@B]\fi}%
+    \expandafter\uput\arg@A(>#2){#3}
+  \fi}\ignorespaces}%
+
 % Modify pst@rot so that a rotation may be specified with a node or ps code
 %
 \define@key[psset]{pstricks-add}{Os}[0]{\def\PST@Os{#1}}