Oops. When the e-mail address came first, or there was no name with it,

checkAUTHORS.pl wasn't recognising it, which caused the change to be
attributed to the committer rather than the author. This now reveals
several people "missing" from the AUTHORS file.

p4raw-id: //depot/perl@26855

diff --git a/Porting/checkAUTHORS.pl b/Porting/checkAUTHORS.pl
index 9b9fe41..e3ce324 100644 (file)
--- a/Porting/checkAUTHORS.pl
+++ b/Porting/checkAUTHORS.pl
@@ -245,7 +245,7 @@ sub display_ordered {
 sub process {
   my ($committer, $patch, $log) = @_;
   return unless $committer;
-  my @authors = $log =~ /From:.+\s+([^\@ \t\n]+\@[^\@ \t\n]+)/gm;
+  my @authors = $log =~ /From:\s+.*?([^"\@ \t\n]+\@[^"\@ \t\n]+)/gm;
 
   if (@authors) {
     foreach (@authors) {