1 files changed, 22 insertions, 13 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 018fa300df7..cc9e083a2be 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 924 2014-06-16 21:25:49Z herbert $
+%% $Id: pstricks-add.tex 933 2014-07-11 19:23:25Z herbert $
 %%
 %% This is file `pstricks-add.tex',
 %%
@@ -30,8 +30,8 @@
 \ifx\PSTXKeyLoaded\endinput\else  \input pst-xkey \fi
 \ifx\PSTmathLoaded\endinput\else  \input pst-math \fi
 %
-\def\fileversion{3.73}
-\def\filedate{2014/06/16}
+\def\fileversion{3.74}
+\def\filedate{2014/07/15}
 \message{`pstricks-add' v\fileversion, \filedate\space (dr,hv)}
 %
 \edef\PstAtCode{\the\catcode`\@} \catcode`\@=11\relax
@@ -2330,11 +2330,16 @@ a add
   \global\psVectorCtr=\@ne
   \gdef\psVectorName{#1}%
   \pnode(#2){#10}%
-  \pst@getcoor{#2}\pst@tempA% 
-  \pstVerb{tx@Dict begin 
-           \pst@tempA 
-           \pst@number\psyunit div /cp.Y exch def 
-           \pst@number\psxunit div /cp.X exch def end }\ignorespaces}
+%  \pst@getcoor{#2}\pst@vector@cp 
+  \pstVerb{ 
+    gsave tx@Dict begin
+    STV CP T \psGetNodeCenter{#10}
+    /cp.X  #10.x def /cp.Y #10.y def
+%           \pst@vector@cp 
+%           \pst@number\psyunit mul /cp.Y exch def 
+%           \pst@number\psxunit mul /cp.X exch def 
+   end grestore }%
+  \ignorespaces}
 %
 \def\psVector{\pst@object{psVector}}
 \def\psVector@i{%
@@ -2343,11 +2348,15 @@ a add
 %  \addto@par{showpoints=false}%
   \psVector@ii}
 
-\def\psVector@ii(#1){%
+\def\psVector@ii{\@ifnextchar<\psVector@iii\psVector@iv}%
+\def\psVector@iii<#1>{\psStartPoint(#1)\psVector@iv}
+
+\def\psVector@iv(#1){%
   \pst@getcoor{#1}\pst@tempCoor
   \begingroup
   \use@keep@par
-  \rput(! cp.X cp.Y ){%
+  \pst@cntm=\the\psVectorCtr \advance\pst@cntm by \m@ne
+  \rput(\psVectorName\the\pst@cntm){% \else cp.X cp.Y \fi){%
     \pnode(0,0){@@@A}\pnode(#1){@@@B}
     \ifPst@markAngle
       \psarc[style=psMarkAngleStyle](0,0){1}{0}{!\pst@tempCoor exch atan}%
@@ -2358,12 +2367,12 @@ a add
                          \pst@number\psxunit div cp.X add exch ){\psVectorName\the\psVectorCtr}%
   \global\advance\psVectorCtr by \@ne%
   \endgroup
-  \pst@Verb{ %tx@Dict begin 
+  \pst@Verb{  
     \pst@tempCoor 
     \pst@number\psyunit div cp.Y add /cp.Y exch def 
-    \pst@number\psxunit div cp.X add /cp.X exch def %end
+    \pst@number\psxunit div cp.X add /cp.X exch def 
   }%  
-  \@ifnextchar(\psVector@ii\ignorespaces}
+  \@ifnextchar(\psVector@iv\ignorespaces}
 %
 \define@key[psset]{pstricks-add}{basename}{\def\psk@basename{#1}}%
 \psset[pstricks-add]{basename=}%