From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Thu, 6 Oct 2022 13:49:39 +0000 (-0700)
Subject: remove needless code
X-Git-Tag: 20220613.06~9
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=9ff3e0316575d7283973b27e66e4aa37258eaaa3;p=perltidy.git

remove needless code
---

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index 97694262..720763d8 100644
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -8803,7 +8803,6 @@ sub keep_old_line_breaks {
                 # check for special matching codes
                 if ( !$match ) {
                     if ( $token eq '(' || $token eq ')' ) {
-                        my $seqno = $rLL->[$KK]->[_TYPE_SEQUENCE_];
                         $match =
                           $self->match_paren_control_flag( $seqno, $flag );
                     }