fixes suggested by perlcritic

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index db551282128baf7335cc0fa87237b2ba811fca8c..454037fdef682ac827db32c0c7bf4f54cf259e14 100644 (file)
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -1637,6 +1637,7 @@ $msg2
 Only the last will be used.
 EOM
     }
+    return;
 }
 
 sub initialize_whitespace_hashes {

diff --git a/lib/Perl/Tidy/VerticalAligner.pm b/lib/Perl/Tidy/VerticalAligner.pm
index faac580fb898c8b441307a6cfcc7c8869619a807..978d5fbc10935007eb8900fe2bdef8dfaca73cb1 100644 (file)
--- a/lib/Perl/Tidy/VerticalAligner.pm
+++ b/lib/Perl/Tidy/VerticalAligner.pm
@@ -4072,7 +4072,7 @@ sub get_output_line_number {
             $cached_line_text        = "";
             $cached_line_text_length = 0;
             $cached_seqno_string     = "";
-            $cached_line_Kend        = undef,;
+            $cached_line_Kend        = undef;
         }
         return;
     }