This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
t/re/anyof.t: Fix test names
[perl5.git] / t / re / anyof.t
index b7656d6..eee7467 100644 (file)
@@ -877,8 +877,7 @@ while (defined (my $test = shift @tests)) {
                               [[:xdigit:]]{2} )? /x, $test_name);
         }
         else {
-            is($result, $expected,
-               "Verify compilation of $test displays as $test_name");
+            is($result, $expected, $test_name);
         }
     }
 }