Commit 84034458 authored by msvensson@pilot.(none)'s avatar msvensson@pilot.(none)
Browse files

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

parent c021fc9a
Loading
Loading
Loading
Loading
+6 −1
Original line number Diff line number Diff line
@@ -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: $_";
            }
          }
        }