User: knarf Date: 2012/05/21 06:14 PM
Modified: /release-info/ parse_testsuite_results.cgi
Log: make new entries work (not processors is output
File Changes:
Directory: /release-info/ =========================
File [modified]: parse_testsuite_results.cgi Delta lines: +1 -1 =================================================================== --- release-info/parse_testsuite_results.cgi 2012-05-21 23:04:16 UTC (rev 822) +++ release-info/parse_testsuite_results.cgi 2012-05-21 23:14:27 UTC (rev 823) @@ -40,7 +40,7 @@ # parse general information my ($user,$time); $time = ParseDate("10 years ago"); # some default for non-existant entries - if ($results_str =~ /\n {4}Time *-> ([^\n]*)\n {4}Host *-> [^\n]*\n {4}User *-> ([^\n]*)\n/sm) + if ($results_str =~ /\n {4}Time *-> ([^\n]*)\n {4}Host *-> [^\n]*\n {4}(Processes *-> [^\n]*\n {4})?User *-> ([^\n]*)\n/sm) { $time = ParseDate($1); $user = $2;