From 75bf3b38077a3766436af47c8c64290100a9941d Mon Sep 17 00:00:00 2001 From: Steve Hancock Date: Thu, 18 Jun 2020 20:05:10 -0700 Subject: [PATCH] fixed MANIFEST and some formatting before release --- MANIFEST | 1 - lib/Perl/Tidy/Tokenizer.pm | 12 ++++++------ 2 files changed, 6 insertions(+), 7 deletions(-) diff --git a/MANIFEST b/MANIFEST index 2cebfab3..3c8243cb 100644 --- a/MANIFEST +++ b/MANIFEST @@ -83,4 +83,3 @@ t/testsa.t t/testss.t t/testwide.pl.src t/testwide.t -t/testwide.t.tdy diff --git a/lib/Perl/Tidy/Tokenizer.pm b/lib/Perl/Tidy/Tokenizer.pm index beeadbf0..94d10e50 100644 --- a/lib/Perl/Tidy/Tokenizer.pm +++ b/lib/Perl/Tidy/Tokenizer.pm @@ -2162,16 +2162,16 @@ sub prepare_for_a_new_file { $in_attribute_list = 1; } - # Look for Switch::Plain syntax if an error would otherwise occur - # here. Note that we do not need to check if the extended syntax - # flag is set because otherwise an error would occur, and we would - # then have to output a message telling the user to set the - # extended syntax flag to avoid the error. + # Look for Switch::Plain syntax if an error would otherwise occur + # here. Note that we do not need to check if the extended syntax + # flag is set because otherwise an error would occur, and we would + # then have to output a message telling the user to set the + # extended syntax flag to avoid the error. # case 1: { # default: { # default: # Note that the line 'default:' will be parsed as a label elsewhere. - elsif ($is_case_default{$statement_type} + elsif ( $is_case_default{$statement_type} && !is_balanced_closing_container(QUESTION_COLON) ) { # mark it as a perltidy label type -- 2.39.5