Split $data->{package} on colons too when adding maintainers; should stop
"Package: foo: bar" from blowing things up hideously.
#!/usr/bin/perl
-# $Id: process.in,v 1.83 2003/09/04 23:37:40 cjwatson Exp $
+# $Id: process.in,v 1.84 2003/09/18 17:31:48 cjwatson Exp $
#
# Usage: process nn
# Temps: incoming/Pnn
}
close(SOURCES);
$anymaintfound=0; $anymaintnotfound=0;
- for $p (split(m/[ \t?,()]+/,$data->{package})) {
+ for $p (split(m/[ \t?,():]+/,$data->{package})) {
$p =~ y/A-Z/a-z/;
if (defined $gSubscriptionDomain) {
if (defined($pkgsrc{$p})) {