Add name of test that generated the warning to "warnings" file

This commit is contained in:
msvensson@pilot.(none) 2007-06-21 16:37:13 +02:00
parent c021fc9a92
commit 840344589e

View File

@ -272,6 +272,7 @@ sub mtr_report_stats ($) {
{
foreach my $errlog ( sort glob("$::opt_vardir/log/*.err") )
{
my $testname= "";
unless ( open(ERR, $errlog) )
{
mtr_warning("can't read $errlog");
@ -287,10 +288,14 @@ sub mtr_report_stats ($) {
{
next; # Skip these lines
}
if ( /CURRENT_TEST: (.*)/ )
{
$testname= $1;
}
if ( /$pattern/ )
{
$found_problems= 1;
print WARN basename($errlog) . ": $_";
print WARN basename($errlog) . ": $testname: $_";
}
}
}