From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Tue, 12 Jul 2022 16:38:23 +0000 (-0700)
Subject: remove unused variable
X-Git-Tag: 20220613.03~21
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=1453e45ef4bf1727869b3cc70be1400c61286023;p=perltidy.git

remove unused variable
---

diff --git a/lib/Perl/Tidy/VerticalAligner.pm b/lib/Perl/Tidy/VerticalAligner.pm
index 3f851533..cc6b59d5 100644
--- a/lib/Perl/Tidy/VerticalAligner.pm
+++ b/lib/Perl/Tidy/VerticalAligner.pm
@@ -670,17 +670,10 @@ sub valign_input {
     # --------------------------------------------------------------------
     # Collect outdentable block COMMENTS
     # --------------------------------------------------------------------
-    my $is_blank_line = EMPTY_STRING;
     if ( $self->[_group_type_] eq 'COMMENT' ) {
-        if (
-            (
-                   $is_block_comment
-                && $outdent_long_lines
-                && $leading_space_count ==
-                $self->[_comment_leading_space_count_]
-            )
-            || $is_blank_line
-          )
+        if (   $is_block_comment
+            && $outdent_long_lines
+            && $leading_space_count == $self->[_comment_leading_space_count_] )
         {
 
             # Note that for a comment group we are not storing a line