--- mailgraph.pl.orig Sun Jan 5 23:32:04 2003 +++ mailgraph.pl Fri May 30 16:26:07 2003 @@ -120,6 +120,8 @@ \s ([-\w\.]+) # host -- 6 \s+ + <[^>]+> # OSSP fsl log level + \s+ (.*) # text -- 7 $/x or do { --- mailgraph.cgi.orig Tue Jan 20 13:01:36 2004 +++ mailgraph.cgi Tue Jan 20 13:02:07 2004 @@ -151,27 +151,17 @@ -Mail Statistics for $host +Postfix Mail Statistics for $host - + HEADER - print "

Mail Statistics for $host

\n"; + print "

Postfix Mail Statistics for $host

\n"; for my $n (0..$#graphs) { print "

$graphs[$n]{title}

\n"; print "

\"mailgraph\"\n"; print "

\"mailgraph\"\n"; } - - print < -Mailgraph $VERSION -by David Schweikert - - - - -FOOTER } sub send_image($)