1 files changed, 17 insertions, 18 deletions
diff --git a/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex b/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex
index 4f5bb65007e..1c14df1bd36 100644
--- a/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex
+++ b/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex
@@ -1,4 +1,4 @@
-% $Id: pst-plot.tex 372 2010-08-17 09:46:20Z herbert $
+% $Id: pst-plot.tex 388 2010-09-28 16:31:24Z herbert $
 %% BEGIN pst-plot.tex
 %%
 %% plotting functions and data with PSTricks.
@@ -20,8 +20,8 @@
 \ifx\PSTFPloaded\endinput\else   \input pst-fp.tex  \fi
 \ifx\MultidoLoaded\endinput\else \input multido.tex \fi
 %
-\def\fileversion{1.20}
-\def\filedate{2010/09/09}
+\def\fileversion{1.21}
+\def\filedate{2010/09/28}
 \message{ v\fileversion, \filedate\space (tvz,hv)}
 %
 \edef\TheAtCode{\the\catcode`\@}
@@ -2047,13 +2047,16 @@ D\space##1%
   \pstFPsub\pst@tempA{#3}{#1}%
   \pst@dimm=#5%
   \pst@dimo=\pst@tempA pt%
-  \pstFPdiv\pst@@dx{\strip@pt\pst@dimm}\pst@tempA%
+  \pstFPdiv\pst@@dx{\strip@pt\pst@dimm}{\pst@tempA}%
   \pst@xunit=\pst@@dx\p@%
 %
-  \pstFPsub\pst@tempA{#4}{#2}%
-  \ifx!#6\pst@dimm=\pst@@dx\pst@dimo\else\pst@dimm=#6\fi%
-  \pstFPdiv\pst@@dy{\strip@pt\pst@dimm}\pst@tempA%
-  \pst@yunit=\pst@@dy\p@%
+  \ifx!#6\let\pst@yunit=\pst@xunit\else
+    \pst@dimm=#6%
+%  \pst@dimm=\pst@@dx\pst@dimo\else\pst@dimm=#6\fi%
+    \pstFPsub\pst@tempA{#4}{#2}%
+    \pstFPdiv\pst@@dy{\strip@pt\pst@dimm}{\pst@tempA}%
+    \pst@yunit=\pst@@dy\p@%
+  \fi%
   %
   \pst@dimm=#1\pst@xunit\advance\pst@dimm by \psk@llx%
   \pst@dimn=#2\pst@yunit\advance\pst@dimn by \psk@lly%
@@ -2074,21 +2077,17 @@ D\space##1%
   \pst@killglue%
   \begingroup%
   \pstFPsub\pst@tempA{#5}{#3}%
-%  \pst@dimo=#5\p@ \pst@dimp=#3\p@ \multiply\pst@dimp by \m@ne% 
-%  \advance\pst@dimo by \pst@dimp% delta x
   \pst@dimm=#7%
   \pst@dimo=\pst@tempA pt%
-%  \pstFPdiv\pst@@dx{\strip@pt\pst@dimm}{\strip@pt\pst@dimo}%
   \pstFPdiv\pst@@dx{\strip@pt\pst@dimm}\pst@tempA%
   \pst@xunit=\pst@@dx\p@%
 %
-  \pstFPsub\pst@tempA{#6}{#4}%
-%  \pst@dimo=#6\p@\pst@dimp=#4\p@\multiply\pst@dimp by \m@ne% 
-%  \advance\pst@dimo by \pst@dimp% delta y
-  \ifx!#8\pst@dimm=\pst@@dx\pst@dimo\else\pst@dimm=#8\fi%
-%  \pstFPdiv\pst@@dy{\strip@pt\pst@dimm}{\strip@pt\pst@dimo}%
-  \pstFPdiv\pst@@dy{\strip@pt\pst@dimm}\pst@tempA%
-  \pst@yunit=\pst@@dy\p@%
+  \ifx!#8\let\pst@yunit=\pst@xunit\else
+    \pst@dimm=#8%
+    \pstFPsub\pst@tempA{#6}{#4}%
+    \pstFPdiv\pst@@dy{\strip@pt\pst@dimm}\pst@tempA%
+    \pst@yunit=\pst@@dy\p@%
+  \fi%
   %
   \pst@dima=#3\pst@xunit \advance\pst@dima by \psk@llx%
   \pst@dimb=#4\pst@yunit \advance\pst@dimb by \psk@lly%