From 0a4d725a0aee4a1a860f5cbe2832019665d31e8e Mon Sep 17 00:00:00 2001 From: Steve Hancock Date: Tue, 8 Sep 2020 10:30:14 -0700 Subject: [PATCH] remove confusing warning message --- lib/Perl/Tidy/Tokenizer.pm | 18 ++++++++++-------- 1 file changed, 10 insertions(+), 8 deletions(-) diff --git a/lib/Perl/Tidy/Tokenizer.pm b/lib/Perl/Tidy/Tokenizer.pm index 0d803e67..7685f8ff 100644 --- a/lib/Perl/Tidy/Tokenizer.pm +++ b/lib/Perl/Tidy/Tokenizer.pm @@ -218,8 +218,7 @@ Called from File '$fname' at line '$lno' This error is probably due to a recent programming change ====================================================================== EOM - Perl::Tidy::Die( - "Error exit due to unexpected Autoload call to '$AUTOLOAD'\n"); + exit 1; } sub check_options { @@ -2140,12 +2139,15 @@ sub prepare_for_a_new_file { find_angle_operator_termination( $input_line, $i, $rtoken_map, $expecting, $max_token_index ); - if ( $type eq '<' && $expecting == TERM ) { - error_if_expecting_TERM(); - interrupt_logfile(); - warning("Unterminated <> operator?\n"); - resume_logfile(); - } + ## This message is not very helpful and quite confusing if the above + ## routine decided not to write a message with the line number. + ## if ( $type eq '<' && $expecting == TERM ) { + ## error_if_expecting_TERM(); + ## interrupt_logfile(); + ## warning("Unterminated <> operator?\n"); + ## resume_logfile(); + ## } + } else { } -- 2.39.5