texlive[49519] Master/texmf-dist/tex/generic/pstricks/pstricks.tex:

[commits+karl at tug.org]

Revision: 49519
          http://tug.org/svn/texlive?view=revision&revision=49519
Author:   karl
Date:     2018-12-29 00:26:28 +0100 (Sat, 29 Dec 2018)
Log Message:
-----------
pstricks (27dec18)

Modified Paths:
--------------
    trunk/Master/texmf-dist/tex/generic/pstricks/pstricks.tex

Modified: trunk/Master/texmf-dist/tex/generic/pstricks/pstricks.tex
===================================================================
--- trunk/Master/texmf-dist/tex/generic/pstricks/pstricks.tex	2018-12-28 23:26:11 UTC (rev 49518)
+++ trunk/Master/texmf-dist/tex/generic/pstricks/pstricks.tex	2018-12-28 23:26:28 UTC (rev 49519)
@@ -1,4 +1,4 @@
-%% $Id: pstricks.tex 872 2018-12-21 20:39:31Z herbert $
+%% $Id: pstricks.tex 881 2018-12-27 09:56:29Z herbert $
 %% pstricks.tex
 %% COPYRIGHT 1993, 1994, 1999 by Timothy Van Zandt, tvz at nwu.edu.
 %% COPYRIGHT 2000-2003 by Denis Girou.
@@ -80,8 +80,8 @@
 \fi
 \let\pgfforeach\foreach
 %
-\def\fileversion{2.90a}
-\def\filedate{2018/12/22}
+\def\fileversion{2.92}
+\def\filedate{2018/12/27}
 \pst at addfams{pstricks}
 %
 %\define at boolkey[psset]{pstricks}[Pst@]{useURWfonts}[true]{}
@@ -3399,10 +3399,11 @@
 \def\psarc at i{\@ifnextchar({\psarc at iii}{\psarc at ii}}
 \def\psarc at ii#1{\addto at par{arrows=#1}\@ifnextchar(\psarc at iii{\psarc at iii(0,0)}}
 \def\psarc at iii(#1)#2#3#4{%
-  \begin at OpenObj%
-    \pst at getangle{#3}\pst at tempa%
-    \pst at getangle{#4}\pst at tempb%
-    \ifx\pst at tempa\pst at tempb\else%
+  \pst at getangle{#3}\pst at tempa
+  \pst at getangle{#4}\pst at tempb
+  \ifx\pst at tempa\pst at tempb
+  \else
+    \begin at OpenObj
       \pst@@getcoor{#1}%
       \pssetlength\pst at dima{#2}%
       \addto at pscode{\psarc at iv \psarc at v
@@ -3409,9 +3410,9 @@
         \ifPst at variableLW \pst at flattenpath \fi
       }%
       \gdef\psarc at type{0}%
-      \showpointsfalse%
-    \fi%
-  \end at OpenObj%
+      \showpointsfalse
+    \end at OpenObj
+  \fi
 }
 \def\psarc at iv{%
   \pst at coor /y ED /x ED
@@ -3578,17 +3579,19 @@
   \@ifnextchar({\psellipticarc at iv(#1)}{\psellipticarc at iv(0,0)(#1)}}
 \def\psellipticarc at iv(#1)(#2)#3#4{%
 %  \addbefore at par{correctAngle=false}
-  \begin at OpenObj%
-  \pst at getcoor{#1}\pst at tempa    %	origin
-  \pst at getcoor{#2}\pst at tempb	%	a b
   \pst at getangle{#3}\pst at tempc	%	start angle
   \pst at getangle{#4}\pst at tempd	% 	end angle
-  \addto at pscode{ 
-    \psellipticarc at definearg \psellipticarc at draw
-    \ifPst at variableLW \pst at flattenpath \fi 
-  }%
-  \ifshowpoints
-    \addto at pscode{
+  \ifdim\pst at tempc pt=\pst at tempd pt
+  \else % same angles? then do nothing
+    \begin at OpenObj
+    \pst at getcoor{#1}\pst at tempa    %	origin
+    \pst at getcoor{#2}\pst at tempb	%	a b
+      \addto at pscode{ 
+        \psellipticarc at definearg \psellipticarc at draw
+        \ifPst at variableLW \pst at flattenpath \fi 
+      }%
+      \ifshowpoints
+      \addto at pscode{
       gsave
       xOrig yOrig T % set origin to ellipse origin
       \ifx\psk at rot\@empty \else \psk at rot\space rotate \fi
@@ -3616,9 +3619,10 @@
       stroke
       grestore 
     }
-  \showpointsfalse%
+    \showpointsfalse
+    \fi
+    \end at OpenObj
   \fi
-  \end at OpenObj%
 }
 \def\psellipticarc at definearg{%
 %  \ifx\psk at rot\@empty \else \psk at rot\space rotate \fi