From e49cf41cbab226e1044b17ad18b6122949d85dee Mon Sep 17 00:00:00 2001 From: Steve Hancock Date: Tue, 12 May 2020 04:58:14 -0700 Subject: [PATCH] removed some unused variables --- lib/Perl/Tidy/Formatter.pm | 8 +------- 1 file changed, 1 insertion(+), 7 deletions(-) diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm index 5330ba4f..e1c987fa 100644 --- a/lib/Perl/Tidy/Formatter.pm +++ b/lib/Perl/Tidy/Formatter.pm @@ -3112,17 +3112,11 @@ sub respace_tokens { my $jmax = -1; if ( defined($Kfirst) ) { $jmax = $Klast - $Kfirst } my $input_line = $line_of_tokens->{_line_text}; - my $in_continued_quote = my $starting_in_quote = - $line_of_tokens->{_starting_in_quote}; - my $in_quote = $line_of_tokens->{_ending_in_quote}; - my $ending_in_quote = $in_quote; - my $guessed_indentation_level = - $line_of_tokens->{_guessed_indentation_level}; my $is_static_block_comment = 0; # Handle a continued quote.. - if ($in_continued_quote) { + if ($line_of_tokens->{_starting_in_quote} ) { # A line which is entirely a quote or pattern must go out # verbatim. Note: the \n is contained in $input_line. -- 2.39.5