From: Nicholas Clark Date: Thu, 29 Sep 2005 10:54:56 +0000 (+0000) Subject: Cope with completely empty lines within the Changes file. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=84fd1186674f7e16cbe42e2947846d025465181d;p=p5sagit%2Fp5-mst-13.2.git Cope with completely empty lines within the Changes file. Better diagnostics on "malformed" lines. p4raw-id: //depot/perl@25656 --- diff --git a/Porting/checkAUTHORS.pl b/Porting/checkAUTHORS.pl index fa5f863..a52e090 100644 --- a/Porting/checkAUTHORS.pl +++ b/Porting/checkAUTHORS.pl @@ -124,12 +124,14 @@ while (<>) { $log = $_; my $prefix = " " x length $1; LOG: while (<>) { + next if /^$/; if (s/^$prefix//) { $log .= $_; } elsif (/^\s+Branch:/) { last LOG; } else { - die "Malformed log end with $_"; + chomp; + die "Malformed log end with '$_'"; } } }