removed unused var

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index c8c4edcf2e3cfcb3baeb50867fd175bdff78b709..083962bedd5c670acad875769ebe15f89546990f 100644 (file)
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -16784,7 +16784,6 @@ sub get_seqno {
             my @tmp     = reverse @{$rix_seqno_controlling_ci};
             my $ix_next = pop @tmp;
             foreach my $line ( 0 .. $max_line ) {
-                my $ibeg = $ri_first->[$line];
                 my $iend = $ri_last->[$line];
                 while ( defined($ix_next) && $ix_next <= $iend ) {
                     push @{ $i_controlling_ci[$line] }, $ix_next;