From 57c9092e91c61a1603e4da6c38277ce5e1736879 Mon Sep 17 00:00:00 2001 From: Steve Hancock Date: Mon, 29 Aug 2022 09:21:01 -0700 Subject: [PATCH] simplification --- lib/Perl/Tidy/Formatter.pm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm index 262ddcae..baf30290 100644 --- a/lib/Perl/Tidy/Formatter.pm +++ b/lib/Perl/Tidy/Formatter.pm @@ -19111,9 +19111,8 @@ EOM $block_type = $block_type_to_go[$i]; $token = $tokens_to_go[$i]; $type_sequence = $type_sequence_to_go[$i]; - my $next_type = $types_to_go[ $i + 1 ]; - my $next_token = $tokens_to_go[ $i + 1 ]; - my $i_next_nonblank = ( ( $next_type eq 'b' ) ? $i + 2 : $i + 1 ); + + my $i_next_nonblank = $inext_to_go[$i]; $next_nonblank_type = $types_to_go[$i_next_nonblank]; $next_nonblank_token = $tokens_to_go[$i_next_nonblank]; $next_nonblank_block_type = $block_type_to_go[$i_next_nonblank]; -- 2.39.5