CTAN sync 202209090301

3 files changed, 13 insertions, 9 deletions

diff --git a/graphics/pstricks/base/Changes b/graphics/pstricks/base/Changes
index a258841662..8a7f6c372c 100644
--- a/graphics/pstricks/base/Changes
+++ b/graphics/pstricks/base/Changes
@@ -1,4 +1,4 @@
-% $Id: Changes 594 2022-08-30 18:06:58Z herbert $
+% $Id: Changes 601 2022-09-08 19:21:27Z herbert $
 
 For all changes see file History! Here are only the last one changes
 listed.
@@ -11,6 +11,7 @@ pstricks.tex --------
 versions like 2.47a have only changes in other files, but not
 in this main package.
 
+3.14a 2022-09-08  - fix for wrong pro files
 3.14  2022-08-30  - bugfix for \psdots* in pstricks-dots.tex
 3.13a 2022-08-27  - define \colorlet, if used with etex
 3.13  2022-01-09  - revert presetting "dimen=inner" for circle/ellipse
diff --git a/graphics/pstricks/base/dvips/pst-dots.pro b/graphics/pstricks/base/dvips/pst-dots.pro
index 62353d6c08..ebed06ede5 100644
--- a/graphics/pstricks/base/dvips/pst-dots.pro
+++ b/graphics/pstricks/base/dvips/pst-dots.pro
@@ -1,7 +1,7 @@
-% $Id: pst-dots.pro 4 2020-06-09 08:32:19Z herbert $
+% $Id: pst-dots.pro 601 2022-09-08 19:21:27Z herbert $
 %
 %% PostScript prologue for pstricks.tex.
-%% Version 2.02,  2009/06/16
+%% Version 2.02,  2021/10/01
 %%
 %% For distribution, see pstricks.tex.
 %%
@@ -16,7 +16,7 @@
 %% to add /Diamond, /SolidDiamond and /BoldDiamond
 %% Modified by Herbert Voss (hv) - 2008/04/17 
 %
-12 dict dup dup begin
+12 dict dup begin
 /FontType 1 def
 /FontName /PSTricksDotFont def
 /FontInfo 9 dict dup begin
@@ -329,6 +329,6 @@ DBB61743DC569337082176ECBAD417354A5F900EA0BB5479162ED7ECCCD71AE8
 0000000000000000000000000000000000000000000000000000000000000000
 0000000000000000000000000000000000000000000000000000000000000000
 cleartomark
-/PSTricksDotFont exch definefont
+%/PSTricksDotFont exch definefont
 %
 %% end
\ No newline at end of file
diff --git a/graphics/pstricks/base/dvips/pstricks.pro b/graphics/pstricks/base/dvips/pstricks.pro
index 178eb0475a..47e9fd6631 100644
--- a/graphics/pstricks/base/dvips/pstricks.pro
+++ b/graphics/pstricks/base/dvips/pstricks.pro
@@ -1,7 +1,7 @@
-% $Id: pstricks.pro 269 2021-09-25 13:47:26Z herbert $
+% $Id: pstricks.pro 407 2022-01-12 17:06:33Z herbert $
 %
 %% PostScript prologue for pstricks.tex.
-%% Version 1.40, 2021/09/25
+%% Version 1.41, 2021/11/16
 %%
 %% This program can be redistributed and/or modified under the terms
 %% of the LaTeX Project Public License Distributed from CTAN archives
@@ -17,6 +17,8 @@ revision 952 gt
          (\n\n%%%% WARNING: Transparency operations ignored - need to use -dALLOWPSTRANSPARENCY\n\n) print flush
          /.setopacityalpha { pop } bind def 
          /.setshapealpha { pop } bind def 
+         /.setfillconstantalpha { pop } bind def 
+         /.setstrokeconstantalpha { pop } bind def 
       }
       {
         /.setopacityalpha /.setfillconstantalpha load def 
@@ -40,6 +42,7 @@ revision 952 gt
 /tx@Dict 200 dict def 				% the main PSTricks dictionary
 tx@Dict begin
 /ADict 25 dict def				% The arrow dictionary
+/fill@Dict 30 dict def				% the fill dictionary
 /CM { matrix currentmatrix } bind def
 /SLW /setlinewidth load def
 /CLW /currentlinewidth load def
@@ -948,8 +951,8 @@ tx@Dict begin
     } ifelse 
 } def
 %
-/Frame { 
-  CLW mul /a ED 
+/Frame { %  on  stack \psk@dimen
+  CLW mul /a ED % save radius
   3 -1 roll 
   2 copy gt { exch } if 
   a sub /y2 ED