has fix for git #105

diff --git a/CHANGES.md b/CHANGES.md
index 740fd32e584259f3b628573b9d5183b7b4a1124b..212e712e207c668ccbfc0fc5e53873688e7d4f89 100644 (file)
--- a/CHANGES.md
+++ b/CHANGES.md
@@ -1,6 +1,6 @@
 # Perltidy Change Log
 
-## 2022 06 13.02
+## 2022 06 13.03
 
     - Fix for issue git #105, incorrect formatting with 5.36 experimental
       for_list feature.

diff --git a/MANIFEST b/MANIFEST
index d288cf0eb0c98e3f195f1f364149fac5f5cd30a1..d59b0532f8ce88a2aeadeb93a1729c9af2bc287f 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -87,6 +87,7 @@ t/snippets8.t
 t/snippets9.t
 t/test-eol.t
 t/test.t
+t/test_DEBUG.t
 t/testsa.t
 t/testss.t
 t/testwide-passthrough.pl.src

diff --git a/bin/perltidy b/bin/perltidy
index a3e4c54ca048b3946067e2e55f9018c60dac0bfc..35f99f826e5a61bb5f31ffd418825086ac2bae67 100755 (executable)
--- a/bin/perltidy
+++ b/bin/perltidy
@@ -5184,7 +5184,7 @@ The perltidy binary uses the Perl::Tidy module and is installed when that module
 
 =head1 VERSION
 
-This man page documents perltidy version 20220613.02
+This man page documents perltidy version 20220613.03
 
 =head1 BUG REPORTS
 

diff --git a/lib/Perl/Tidy.pm b/lib/Perl/Tidy.pm
index b2ced569b673ef509959d543b809d322b3d52d3b..d040958b428ec29815981a6f5560f10976e9ad59 100644 (file)
--- a/lib/Perl/Tidy.pm
+++ b/lib/Perl/Tidy.pm
@@ -113,7 +113,7 @@ BEGIN {
     # then the Release version must be bumped, and it is probably past time for
     # a release anyway.
 
-    $VERSION = '20220613.02';
+    $VERSION = '20220613.03';
 }
 
 sub DESTROY {

diff --git a/lib/Perl/Tidy.pod b/lib/Perl/Tidy.pod
index 00872e3672f9d25ecf6834f2deb51f255d3123a3..0bf93866d34f39678cfcb6bf56059e32fb294f6a 100644 (file)
--- a/lib/Perl/Tidy.pod
+++ b/lib/Perl/Tidy.pod
@@ -475,7 +475,7 @@ The module 'Perl::Tidy' comes with a binary 'perltidy' which is installed when t
 
 =head1 VERSION
 
-This man page documents Perl::Tidy version 20220613.02
+This man page documents Perl::Tidy version 20220613.03
 
 =head1 LICENSE
 

diff --git a/lib/Perl/Tidy/Debugger.pm b/lib/Perl/Tidy/Debugger.pm
index bd4ca05684756f56c12d851234a2d31890435d39..15f5fab859ecab5f7efeb395eb595298a1c7bc37 100644 (file)
--- a/lib/Perl/Tidy/Debugger.pm
+++ b/lib/Perl/Tidy/Debugger.pm
@@ -8,7 +8,7 @@ package Perl::Tidy::Debugger;
 use strict;
 use warnings;
 use English qw( -no_match_vars );
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 
 use constant EMPTY_STRING => q{};
 use constant SPACE        => q{ };

diff --git a/lib/Perl/Tidy/DevNull.pm b/lib/Perl/Tidy/DevNull.pm
index 28c55b055197bac692680aa94f045a8fcfe7e1e5..2e9b88166dd733a391ddd6fb961f5c76d8cf38c1 100644 (file)
--- a/lib/Perl/Tidy/DevNull.pm
+++ b/lib/Perl/Tidy/DevNull.pm
@@ -7,7 +7,7 @@
 package Perl::Tidy::DevNull;
 use strict;
 use warnings;
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 sub new   { my $self = shift; return bless {}, $self }
 sub print { return }
 sub close { return }

diff --git a/lib/Perl/Tidy/Diagnostics.pm b/lib/Perl/Tidy/Diagnostics.pm
index ef628b7673e8a3f3a220c6da67113d9709a85539..8d296492611db8d02683d1f1381d4f0a9fc08f9c 100644 (file)
--- a/lib/Perl/Tidy/Diagnostics.pm
+++ b/lib/Perl/Tidy/Diagnostics.pm
@@ -21,7 +21,7 @@ package Perl::Tidy::Diagnostics;
 use strict;
 use warnings;
 use English qw( -no_match_vars );
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 
 use constant EMPTY_STRING => q{};
 

diff --git a/lib/Perl/Tidy/FileWriter.pm b/lib/Perl/Tidy/FileWriter.pm
index f25c43a3a483b6ed45ca7c720451f761c8da8741..ba86003105a16e84e8537c04eb4ce8381bda4395 100644 (file)
--- a/lib/Perl/Tidy/FileWriter.pm
+++ b/lib/Perl/Tidy/FileWriter.pm
@@ -7,7 +7,7 @@
 package Perl::Tidy::FileWriter;
 use strict;
 use warnings;
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 
 use constant DEVEL_MODE   => 0;
 use constant EMPTY_STRING => q{};

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index e98ae5deca686bdc440a2dcad0b5480cd0aa7cdd..5fcafd0555086555938cb8ef65592cc031e3da4c 100644 (file)
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -52,7 +52,7 @@ use constant SPACE        => q{ };
 
 use Carp;
 use English qw( -no_match_vars );
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 
 # The Tokenizer will be loaded with the Formatter
 ##use Perl::Tidy::Tokenizer;    # for is_keyword()

diff --git a/lib/Perl/Tidy/HtmlWriter.pm b/lib/Perl/Tidy/HtmlWriter.pm
index 11369e3cbf6f68c25824aad8c53bbacdb61f7a83..fbc4bac877703b5dd1341ff7704d63782163fc25 100644 (file)
--- a/lib/Perl/Tidy/HtmlWriter.pm
+++ b/lib/Perl/Tidy/HtmlWriter.pm
@@ -7,7 +7,7 @@
 package Perl::Tidy::HtmlWriter;
 use strict;
 use warnings;
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 
 use English qw( -no_match_vars );
 use File::Basename;

diff --git a/lib/Perl/Tidy/IOScalar.pm b/lib/Perl/Tidy/IOScalar.pm
index b5bba496505830af4088f12c684c7d3d2a2671bb..ea88078d1074a24727b735a1616d7c29c585ab0d 100644 (file)
--- a/lib/Perl/Tidy/IOScalar.pm
+++ b/lib/Perl/Tidy/IOScalar.pm
@@ -10,7 +10,7 @@ package Perl::Tidy::IOScalar;
 use strict;
 use warnings;
 use Carp;
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 
 use constant EMPTY_STRING => q{};
 

diff --git a/lib/Perl/Tidy/IOScalarArray.pm b/lib/Perl/Tidy/IOScalarArray.pm
index 72264ac19bb5ed828c92f4926cdba998d9ae8ab6..ee83ce8d6c4d148a89fffb206c667c417e412115 100644 (file)
--- a/lib/Perl/Tidy/IOScalarArray.pm
+++ b/lib/Perl/Tidy/IOScalarArray.pm
@@ -14,7 +14,7 @@ package Perl::Tidy::IOScalarArray;
 use strict;
 use warnings;
 use Carp;
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 
 sub AUTOLOAD {
 

diff --git a/lib/Perl/Tidy/IndentationItem.pm b/lib/Perl/Tidy/IndentationItem.pm
index bf2beeb2e5dfff406c183e314af1723c42f443fb..87949cd62ddadf767cfd9283895cb802e2ee08c1 100644 (file)
--- a/lib/Perl/Tidy/IndentationItem.pm
+++ b/lib/Perl/Tidy/IndentationItem.pm
@@ -8,7 +8,7 @@
 package Perl::Tidy::IndentationItem;
 use strict;
 use warnings;
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 
 BEGIN {
 

diff --git a/lib/Perl/Tidy/LineBuffer.pm b/lib/Perl/Tidy/LineBuffer.pm
index 07d29faeb66e6d12ce089924ec948c6a9d5b45d2..104ef8e3e341bb2cb62ffbefbffb9dd55d4b40cc 100644 (file)
--- a/lib/Perl/Tidy/LineBuffer.pm
+++ b/lib/Perl/Tidy/LineBuffer.pm
@@ -12,7 +12,7 @@
 package Perl::Tidy::LineBuffer;
 use strict;
 use warnings;
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 
 sub AUTOLOAD {
 

diff --git a/lib/Perl/Tidy/LineSink.pm b/lib/Perl/Tidy/LineSink.pm
index adad51c9439dd443b00c17a8fb1a56c296c4bab7..564c1a9ed9761d3c4a61877950732c302f230973 100644 (file)
--- a/lib/Perl/Tidy/LineSink.pm
+++ b/lib/Perl/Tidy/LineSink.pm
@@ -8,7 +8,7 @@
 package Perl::Tidy::LineSink;
 use strict;
 use warnings;
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 
 sub AUTOLOAD {
 

diff --git a/lib/Perl/Tidy/LineSource.pm b/lib/Perl/Tidy/LineSource.pm
index 2c9b22f67eff3823db325ff70b28b2676e55948b..bf794f8229193b6e240f3f335d9a2912b0aeaceb 100644 (file)
--- a/lib/Perl/Tidy/LineSource.pm
+++ b/lib/Perl/Tidy/LineSource.pm
@@ -9,7 +9,7 @@ package Perl::Tidy::LineSource;
 use strict;
 use warnings;
 use English qw( -no_match_vars );
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 
 use constant DEVEL_MODE => 0;
 

diff --git a/lib/Perl/Tidy/Logger.pm b/lib/Perl/Tidy/Logger.pm
index 443a397fd5832ab925e8117e840dc5e32e9f129d..138f48eb0c311a0bcdac2e2b2020a08eb24b7291 100644 (file)
--- a/lib/Perl/Tidy/Logger.pm
+++ b/lib/Perl/Tidy/Logger.pm
@@ -7,7 +7,7 @@
 package Perl::Tidy::Logger;
 use strict;
 use warnings;
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 use English qw( -no_match_vars );
 
 use constant DEVEL_MODE   => 0;

diff --git a/lib/Perl/Tidy/Tokenizer.pm b/lib/Perl/Tidy/Tokenizer.pm
index a8fe9d52ae09e87cd0370f64ff919f008e547fda..ab8bf4c39a638a6dbdf9bfe37fb17d286a545274 100644 (file)
--- a/lib/Perl/Tidy/Tokenizer.pm
+++ b/lib/Perl/Tidy/Tokenizer.pm
@@ -23,7 +23,7 @@ use strict;
 use warnings;
 use English qw( -no_match_vars );
 
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 
 use constant DEVEL_MODE   => 0;
 use constant EMPTY_STRING => q{};

diff --git a/lib/Perl/Tidy/VerticalAligner.pm b/lib/Perl/Tidy/VerticalAligner.pm
index 26843a4aeca33eef2351d8505712b8a7d6496bd3..b8ac814101cd94d97f0a8469a4691ef32e81d2d6 100644 (file)
--- a/lib/Perl/Tidy/VerticalAligner.pm
+++ b/lib/Perl/Tidy/VerticalAligner.pm
@@ -3,7 +3,7 @@ use strict;
 use warnings;
 use Carp;
 use English qw( -no_match_vars );
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 use Perl::Tidy::VerticalAligner::Alignment;
 use Perl::Tidy::VerticalAligner::Line;
 

diff --git a/lib/Perl/Tidy/VerticalAligner/Alignment.pm b/lib/Perl/Tidy/VerticalAligner/Alignment.pm
index 972249ad05b615c453d755cc81da5ffc1d3c9863..99cfd654ea290693efcaeb3f9ac2d893593616a3 100644 (file)
--- a/lib/Perl/Tidy/VerticalAligner/Alignment.pm
+++ b/lib/Perl/Tidy/VerticalAligner/Alignment.pm
@@ -10,7 +10,7 @@ use warnings;
 
 { #<<< A non-indenting brace
 
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 
 sub new {
     my ( $class, $rarg ) = @_;

diff --git a/lib/Perl/Tidy/VerticalAligner/Line.pm b/lib/Perl/Tidy/VerticalAligner/Line.pm
index 604a4ec681f15fcf5ef524fc0ab67e4bbd595b47..ed17a42d15fe92db28843d292609816d1849d1aa 100644 (file)
--- a/lib/Perl/Tidy/VerticalAligner/Line.pm
+++ b/lib/Perl/Tidy/VerticalAligner/Line.pm
@@ -10,7 +10,7 @@ package Perl::Tidy::VerticalAligner::Line;
 use strict;
 use warnings;
 use English qw( -no_match_vars );
-our $VERSION = '20220613.02';
+our $VERSION = '20220613.03';
 
 sub AUTOLOAD {