From: Steve Hay <SteveHay@planit.com>
Date: Mon, 13 Feb 2006 16:46:14 +0000 (+0000)
Subject: Teach checkAUTHORS.pl about Changelogs with leading tabs
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=bdb5e10ec6ba9fc705fa9c12a99747f280685d55;p=p5sagit%2Fp5-mst-13.2.git

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
--- 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
--- 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:/) {