This commit is contained in:
Magnus Svensson 2009-01-28 17:48:10 +01:00
commit 87bbeddbab

View File

@ -3388,7 +3388,7 @@ sub extract_warning_lines ($) {
my @lines; my @lines;
while ( my $line = <$Ferr> ) while ( my $line = <$Ferr> )
{ {
if ( $line =~ /"^CURRENT_TEST:"/ ) if ( $line =~ /^CURRENT_TEST:/ )
{ {
# Throw away lines from previous tests # Throw away lines from previous tests
@lines = (); @lines = ();