diff --git a/mysql-test/mysql-test-run.pl b/mysql-test/mysql-test-run.pl
index 5cc1d1f08e3..5d8b1371151 100755
--- a/mysql-test/mysql-test-run.pl
+++ b/mysql-test/mysql-test-run.pl
@@ -3388,7 +3388,7 @@ sub extract_warning_lines ($) {
   my @lines;
   while ( my $line = <$Ferr> )
   {
-    if ( $line =~ /"^CURRENT_TEST:"/ )
+    if ( $line =~ /^CURRENT_TEST:/ )
     {
       # Throw away lines from previous tests
       @lines = ();