From: Steve Hancock Date: Tue, 12 May 2020 11:58:14 +0000 (-0700) Subject: removed some unused variables X-Git-Tag: 20200619~34 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=e49cf41cbab226e1044b17ad18b6122949d85dee;p=perltidy.git removed some unused variables --- 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.