Fix issue git #57, Warn_count was not initialized
authorSteve Hancock <perltidy@users.sourceforge.net>
Sat, 20 Mar 2021 13:58:58 +0000 (06:58 -0700)
committerSteve Hancock <perltidy@users.sourceforge.net>
Sat, 20 Mar 2021 13:58:58 +0000 (06:58 -0700)
lib/Perl/Tidy.pm
local-docs/BugLog.pod

index 14fe9035a0347619426dc13d297e65e9573beeb7..19344d026eda8fe538a7543f9662bcb7b76def62 100644 (file)
@@ -419,6 +419,9 @@ sub perltidy {
         postfilter            => undef,
     );
 
+    # Fix for issue git #57
+    $Warn_count = 0;
+
     # don't overwrite callers ARGV
     local @ARGV   = @ARGV;
     local *STDERR = *STDERR;
index dc134cf14a4865bf6e4d275b14210388e523e5c2..856f123774a2f15637062980c89cb1b076a4de3f 100644 (file)
@@ -2,6 +2,13 @@
 
 =over 4
 
+=item B<Fix issue git #57, Warn_count was not initialized>
+
+This update fixes issue git #57, in which a warning flag was not getting zeroed
+on each new call to perltidy.
+
+19 Mar 2021.
+
 =item B<Fix rare problem with combination -lp -wn -naws>
 
 This update fixes case b1032 by includeing lines starting with 'if', 'or', and
@@ -12,7 +19,7 @@ This update also modifies update 7a6be43 of 16 Mar 2021 to exclude list items
 when checking token lengths.  This reduces changes to existing formatting
 while still fixing the problem in case b1031. 
 
-18 Mar 2021.
+18 Mar 2021, 6200034.
 
 =item B<Fix definition of list within list for -bbx flags>