#!/usr/bin/perl
-# $Id: summary.in,v 1.2 1999/09/02 22:27:29 gecko Exp $
+# $Id: summary.in,v 1.3 2001/04/24 19:10:26 doogie Exp $
require('/etc/debbugs/config');
require('/usr/lib/debbugs/errorlib');
$maintainer{$a}= $b;
}
close(M);
+open(M,"$gMaintainerFileOverride") || &quit("open $gMaintainerFileOverride: $!");
+while (<M>) {
+ m/^(\S+)\s+(\S.*\S)\s*$/ || warn "$_ ?";
+ ($a,$b)=($1,$2);
+ $a =~ y/A-Z/a-z/;
+ $maintainer{$a}= $b;
+}
+close(M);
+
defined($startdate= time) || &quit("failed to get time: $!");