Teach checkAUTHORS.pl about Changelogs with leading tabs

in the log entries, and fix a malformed log entry in Changes5.005

p4raw-id: //depot/perl@27172

diff --git a/Changes5.005 b/Changes5.005
index 82c6f06..4c6d0fa 100644 (file)
--- a/Changes5.005
+++ b/Changes5.005
@@ -14129,7 +14129,8 @@ ____________________________________________________________________________
            ! doop.c
 ____________________________________________________________________________
 [   625] By: TimBunce                              on 1998/03/02  22:23:48
-        Log:      Branch: maint-5.004/perl
+        Log: 
+     Branch: maint-5.004/perl
            ! doop.c
 ____________________________________________________________________________
 [   623] By: TimBunce                              on 1998/03/02  21:51:53

diff --git a/Porting/checkAUTHORS.pl b/Porting/checkAUTHORS.pl
index a4e7c3f..20c6e4d 100644 (file)
--- a/Porting/checkAUTHORS.pl
+++ b/Porting/checkAUTHORS.pl
@@ -232,6 +232,7 @@ while (<>) {
     my $prefix = " " x length $1;
     LOG: while (<>) {
       next if /^$/;
+      s/^\t/        /;
       if (s/^$prefix//) {
        $log .= $_;
       } elsif (/^\s+Branch:/) {