texlive[55576] Master/texmf-dist: pst-eucl (17jun20)

[commits+karl at tug.org]

Revision: 55576
          http://tug.org/svn/texlive?view=revision&revision=55576
Author:   karl
Date:     2020-06-17 23:34:29 +0200 (Wed, 17 Jun 2020)
Log Message:
-----------
pst-eucl (17jun20)

Modified Paths:
--------------
    trunk/Master/texmf-dist/doc/generic/pst-eucl/Changes
    trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.pdf
    trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.tex
    trunk/Master/texmf-dist/tex/generic/pst-eucl/pst-eucl.tex

Modified: trunk/Master/texmf-dist/doc/generic/pst-eucl/Changes
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-eucl/Changes	2020-06-17 17:18:32 UTC (rev 55575)
+++ trunk/Master/texmf-dist/doc/generic/pst-eucl/Changes	2020-06-17 21:34:29 UTC (rev 55576)
@@ -6,6 +6,7 @@
 
 
 pst-eucl.tex --------
+1.73  2020/06/07 - Allow the star version for \pstLabelAB to use \cput* or \cput for the label
 1.72a 2020/06/07 - fix a typo in the macro definition \pstMarkAngle
 1.72  2020/04/18 - revert the change of \pstTriangle in v1.69, we should use \pst at object to clear \pst at par.
                  - add macro to draw the Lemonie Point of the given triangle, \pstTriangleLC.

Modified: trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.pdf
===================================================================
(Binary files differ)

Modified: trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.tex
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.tex	2020-06-17 17:18:32 UTC (rev 55575)
+++ trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.tex	2020-06-17 21:34:29 UTC (rev 55576)
@@ -339,7 +339,7 @@
 just use them to draw a ruler bar and put the label on the ruler bar.
 
 \begin{BDef}
-\Lcs{pstLabelAB}\OptArgs\Largb{A}\Largb{B}\Largb{label}
+\Lcs{pstLabelAB}\OptArg{*}\OptArgs\Largb{A}\Largb{B}\Largb{label}
 \end{BDef}
 
 You can use the parameters of \Lcs{ncline} to control the ruler bar,
@@ -350,7 +350,7 @@
 the rule bar and the segment.
 
 It does not display the ruler bar as default, and you need to setup \Lkeyword{linestyle}
-to display it.
+to display it. The star version uses also the star version of the put macro (white background).
 
 \begin{LTXexample}[width=6cm,pos=l]
 \begin{pspicture}[showgrid=true](-1,-1)(4,4)
@@ -363,11 +363,11 @@
 \pstLabelAB[linestyle=dashed]{C}{D}{$\sqrt{a^2+b^2}$}
 \pstGeonode[PosAngle=190](-1,-1){E}
 \pstGeonode[PosAngle=10](3,0){F}\pstLineAB{E}{F}
-\pstLabelAB[linestyle=dashed,arrows=|-|,offset=10pt,linecolor=blue!50]{E}{F}{$\sqrt{a^2+b^2}$}
-\pstLabelAB[linestyle=dashed,arrows=|<->|,offset=10pt,nrot=:D]{F}{E}{$\sqrt{a^2+b^2}$}
+\pstLabelAB*[linestyle=dashed,arrows=|-|,offset=10pt,linecolor=blue!50]{E}{F}{$\sqrt{a^2+b^2}$}
+\pstLabelAB*[linestyle=dashed,arrows=|<->|,offset=10pt,nrot=:D]{F}{E}{$\sqrt{a^2+b^2}$}
 \pstGeonode[PosAngle=100](0,4){G}
 \pstGeonode[PosAngle=-50](4,2){H}\pstLineAB{G}{H}
-\pstLabelAB[linestyle=solid,linecolor=red!50,arrows=|-|,offset=15pt,nrot=:U,npos=0.7]{G}{H}{\textcolor{red!50}{$\dfrac{a}{b}$}}
+\pstLabelAB*[linestyle=solid,linecolor=red!50,arrows=|-|,offset=15pt,nrot=:U,npos=0.7]{G}{H}{\textcolor{red!50}{$\dfrac{a}{b}$}}
 \end{pspicture}
 \end{LTXexample}
 

Modified: trunk/Master/texmf-dist/tex/generic/pst-eucl/pst-eucl.tex
===================================================================
--- trunk/Master/texmf-dist/tex/generic/pst-eucl/pst-eucl.tex	2020-06-17 17:18:32 UTC (rev 55575)
+++ trunk/Master/texmf-dist/tex/generic/pst-eucl/pst-eucl.tex	2020-06-17 21:34:29 UTC (rev 55576)
@@ -20,8 +20,8 @@
 \csname PSTEuclideLoaded\endcsname
 \let\PSTEuclideLoaded\endinput
 %
-\def\fileversion{1.72a}
-\def\filedate{2020/06/07}
+\def\fileversion{1.73}
+\def\filedate{2020/06/17}
 %%
 \message{`PST-Euclide v\fileversion, \filedate\space (dr,hv)}%
 %% prologue for postcript
@@ -284,7 +284,8 @@
   \pnode(#1){#2}
   \xdef\@@GenCourbe{\@@GenCourbe(#2)}%%for accumulating points% DR 22032005
   \Pst at ManageParamList{#2}%
-  \@ifnextchar(\Pst at Geonode@ii{\pst at MngTransformCurve\endgroup}}% DR 22032005
+  \@ifnextchar(\Pst at Geonode@ii{\pst at MngTransformCurve\endgroup
+  }}% DR 22032005
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %% \pstPolygon[options](A)(B)(C)(D)...
@@ -3011,15 +3012,17 @@
 %% - offset: the seperation between label and segment
 %% - nrot: the rotation of the label
 %% - npos: the proportion of the label
-\def\pstLabelAB{\@ifnextchar[\Pst at LabelAB{\Pst at LabelAB[]}}
-\def\Pst at LabelAB[#1]#2#3#4{%
+\def\pstLabelAB{\pst at object{pstLabelAB}}
+\def\pstLabelAB at i#1#2#3{%
   \begingroup
-    \psset{linestyle=none} % default not show the rule bar.
-    \psset{offset=10pt} % default offset is 10pt
-    \psset{nrot=:U} % default rotation is :U
-    \psset{npos=0.5} % default label proportion from A to B is 0.5
-    \psset{#1}\ncline{#2}{#3}\ncput*{#4}
-  \endgroup%
+  \addbefore at par{linestyle=none,offset=10pt,nrot=:U,npos=0.5}% the defaults
+  \use at par
+  \if at star
+    \ncline{#1}{#2}\ncput*{#3}%
+  \else
+    \ncline{#1}{#2}\ncput{#3}%
+  \fi
+  \endgroup
 }%
 %% \pstExtendAB[Options]{A}{B}{distance}{C}
 %% Extend AB to C such that |BC|=distance, then create node C.