Howdy,

people.pl is broken.  The following patch fixes it.

Matt

P.S. It would be nice if you could run
/org/www.debian.org/cron/scripts_weekly/people/update.people.html
by hand instead of waiting for the weekly run.

--- /org/www.debian.org/cron/scripts_weekly/people/people.pl    Fri Feb  1 
10:10:55 2002
+++ people.pl.new       Fri Feb  1 10:54:16 2002
@@ -330,9 +330,9 @@
                # The following should handle almost everyone
                #
                # the latest insane regexp courtesy of Matt Kraai
-               elsif ($maintainer =~ /"?(.+?)\s+(([vV][ao]n )?(da |de |Di |Le 
)?[\w~'-]+),?\s*([IV]*|Jr\.?)"?(\s+\(.*\))?\s+<(.+)>\s*/o) {
+                       ($firstname,$lastname,$email) = ($1,$2,$7);
                }elsif ($maintainer =~ /"?(.+?)\s+(([vV][ao]n )?(da |de |Di |Le 
)?[\w~'-]+),?\s*([IV]*|Jr\.?)"?(\s+\(.*\))?\s+<(.+)>\s*/o) {
+               elsif ($maintainer =~ /"?(.+?)\s+(([vV][ao]n )?(da |de |Di |Le 
)?[\w~'-]+),?\s*([IV]*|Jr\.?)"?(\s+\(.*\))?\s+<(.+)>\s*/o) {
                        ($firstname,$lastname,$email) = ($1,$2,$7);
-                }
+               }
                # elsif ($maintainer =~ /"?([\w~'-]+?)\s+(.*?)\s*(([vV]an |Di 
|de |Le )?[\w~'-]+),?\s*[IV]*"?\s+<(.+)>\s*/o) {
                #       ($firstname,$middlename,$lastname,$email) = 
($1,$2,$3,$5);
 #              elsif ($maintainer =~ /"?(.+?)\s+(([vV][ao]n )?(da |de |Di |Le 
)?[\w~'-]+),?\s*([IV]*|Jr\.?)"?\s+<(.+)>\s*/o) {

Attachment: pgpqRM57H2CRK.pgp
Description: PGP signature

Reply via email to