This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix lib/Module/Build/t/compat.t
authorSteve Hay <SteveHay@planit.com>
Tue, 7 Mar 2006 14:58:20 +0000 (14:58 +0000)
committerSteve Hay <SteveHay@planit.com>
Tue, 7 Mar 2006 14:58:20 +0000 (14:58 +0000)
(e.g. see http://www.nntp.perl.org/group/perl.daily-build.reports/36431)

p4raw-id: //depot/perl@27401

lib/Module/Build/t/compat.t

index 078c6d2..44a136c 100644 (file)
@@ -143,7 +143,7 @@ foreach my $type (@makefile_types) {
   $output = stdout_of( sub { $ran_ok = $mb->do_system(@make, 'test', 'TEST_VERBOSE=0') } );
   ok $ran_ok;
   $output =~ s/^/# /gm;  # Don't confuse our own test output
   $output = stdout_of( sub { $ran_ok = $mb->do_system(@make, 'test', 'TEST_VERBOSE=0') } );
   ok $ran_ok;
   $output =~ s/^/# /gm;  # Don't confuse our own test output
-  like $output, qr/(?:# .+basic\.+ok\s+(?:[\d.]s\s*)?)+# All tests/,
+  like $output, qr/(?:# .+basic\.+ok\s+(?:[\d.]+s\s*)?)# All tests/,
       'Should be non-verbose';
 
   $mb->delete_filetree($libdir);
       'Should be non-verbose';
 
   $mb->delete_filetree($libdir);