danf: curl-www/auto log.cgi,1.30,1.31

[email protected]
Newsgroups gmane.comp.web.curl.www.cvs
Message-ID <[email protected]>
Update of /cvsroot/curl/curl-www/auto
In directory labb:/tmp/cvs-serv28457

Modified Files:
	log.cgi 
Log Message:
Catch more perl die errors.


Index: log.cgi
===================================================================
RCS file: /cvsroot/curl/curl-www/auto/log.cgi,v
retrieving revision 1.30
retrieving revision 1.31
diff -u -d -r1.30 -r1.31
--- log.cgi	20 Apr 2007 16:53:53 -0000	1.30
+++ log.cgi	20 Apr 2007 17:17:32 -0000	1.31
@@ -82,7 +82,7 @@
                 $line =~ s/([^a-zA-Z0-9:=_]{1}?)/sprintf("[%02X]",ord($1))/ge;
             }
             #
-            if(checkwarn($line) || ($line =~ /FAILED/) || ($line =~ /MEMORY FAILURE/) || ($line =~ /Died in .* at line/)) {
+            if(checkwarn($line) || ($line =~ /FAILED/) || ($line =~ /MEMORY FAILURE/) || ($line =~ / at .+ line \d+\./)) {
                 $num++;
                 push @out, "<a name=\"prob$num\"></a><div class=\"warning\">" . CGI::escapeHTML($line) . "</div>\n";
             }
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.