Update of /cvsroot/curl/curl-www/auto
In directory labb:/tmp/cvs-serv22624
Modified Files:
log.cgi
Log Message:
Highlight perl server death errors.
Index: log.cgi
===================================================================
RCS file: /cvsroot/curl/curl-www/auto/log.cgi,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -d -r1.29 -r1.30
--- log.cgi 14 Mar 2007 19:30:48 -0000 1.29
+++ log.cgi 20 Apr 2007 16:53:53 -0000 1.30
@@ -82,7 +82,7 @@
$line =~ s/([^a-zA-Z0-9:=_]{1}?)/sprintf("[%02X]",ord($1))/ge;
}
#
- if(checkwarn($line) || ($line =~ /FAILED/) || ($line =~ /MEMORY
FAILURE/)) {
+ if(checkwarn($line) || ($line =~ /FAILED/) || ($line =~ /MEMORY
FAILURE/) || ($line =~ /Died in .* at line/)) {
$num++;
push @out, "<a name=\"prob$num\"></a><div class=\"warning\">"
. CGI::escapeHTML($line) . "</div>\n";
}
|