From: Steve Hancock Date: Tue, 8 Sep 2020 17:30:14 +0000 (-0700) Subject: remove confusing warning message X-Git-Tag: 20200907.01~36 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=0a4d725a0aee4a1a860f5cbe2832019665d31e8e;p=perltidy.git remove confusing warning message --- 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 { }