module-build-checkins

[Ken W. <kwi...@us...>]

Update of /cvsroot/module-build/Module-Build/lib/Module/Build
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28735/lib/Module/Build

Modified Files:
	PodParser.pm 
Log Message:
Allow AUTHORS for the author list

Index: PodParser.pm
===================================================================
RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/PodParser.pm,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -d -r1.6 -r1.7
--- PodParser.pm	8 Jul 2005 01:29:22 -0000	1.6
+++ PodParser.pm	9 Sep 2005 18:35:27 -0000	1.7
@@ -39,7 +39,7 @@
   
   my @author;
   while (<$fh>) {
-    next unless /^=head1\s+AUTHOR/ ... /^=/;
+    next unless /^=head1\s+AUTHORS?/ ... /^=/;
     next if /^=/;
     push @author, $_ if /\@/;
   }
@@ -93,7 +93,7 @@
   if ($self->{_head} eq 'NAME') {
     my ($name, $abstract) = split( /\s+-\s+/, $text, 2 );
     $self->{abstract} = $abstract;
-  } elsif ($self->{_head} eq 'AUTHOR') {
+  } elsif ($self->{_head} =~ /^AUTHORS?$/) {
     push @{$self->{author}}, $text if $text =~ /\@/;
   }
 }