pst-func 0.71 (3nov10)

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

1 files changed, 8 insertions, 6 deletions

diff --git a/Master/texmf-dist/tex/generic/pst-func/pst-func.tex b/Master/texmf-dist/tex/generic/pst-func/pst-func.tex
index a10b9c025b1..9596aa42367 100644
--- a/Master/texmf-dist/tex/generic/pst-func/pst-func.tex
+++ b/Master/texmf-dist/tex/generic/pst-func/pst-func.tex
@@ -1,4 +1,4 @@
-%% $Id: pst-func.tex 391 2010-10-02 16:43:32Z herbert $
+%% $Id: pst-func.tex 411 2010-11-03 07:58:25Z herbert $
 %%
 %% This is file `pst-func.tex',
 %%
@@ -30,8 +30,8 @@
 % interface to the `xkeyval' package
 \pst@addfams{pst-func}
 %
-\def\fileversion{0.70}
-\def\filedate{2010/10/2}
+\def\fileversion{0.71}
+\def\filedate{2010/11/03}
 \message{`PST-func' v\fileversion, \filedate\space (hv)}
 %
 \pstheader{pst-func.pro}
@@ -226,6 +226,7 @@
 %
 \def\psGaussI{\pst@object{psGaussI}}
 \def\psGaussI@i#1#2{%
+  \addbefore@par{plotpoints=200,plotstyle=line}
   \begin@OpenObj%
   \addto@pscode{
     /a #1  def
@@ -239,14 +240,15 @@
       Euler exch \psk@mue\space sub dup mul 2 div \psk@sigma\space dup mul div neg exp C mul 
     } def 
     end
-    a scx 0 moveto
+%    a scx 0 moveto
+    a scx 0 \@nameuse{beginqp@\psplotstyle}
     \psk@plotpoints 1 sub {
       a b \psk@Simpson % a b M on Stack
       tx@FuncDict begin Simpson I end % y value on stack
-      scy b scx exch lineto 
+      scy b scx exch \@nameuse{doqp@\psplotstyle} %lineto 
       /b b dx add def
     } repeat
-    stroke
+%    stroke
   }%
   \end@OpenObj%
 }