Fix Module-Build test that has been failing on Win32
authorSteve Hay <SteveHay@planit.com>
Thu, 21 Feb 2008 14:02:29 +0000 (14:02 +0000)
committerSteve Hay <SteveHay@planit.com>
Thu, 21 Feb 2008 14:02:29 +0000 (14:02 +0000)
since the upgrade of Test-Harness at #32659

p4raw-id: //depot/perl@33340

lib/Module/Build.pm
lib/Module/Build/t/compat.t

index 6a53ad8..6d6cfe9 100644 (file)
@@ -15,7 +15,7 @@ use Module::Build::Base;
 
 use vars qw($VERSION @ISA);
 @ISA = qw(Module::Build::Base);
-$VERSION = '0.2808_01';
+$VERSION = '0.2808_02';
 $VERSION = eval $VERSION;
 
 # Okay, this is the brute-force method of finding out what kind of
index 8eb654a..2d70e98 100644 (file)
@@ -174,7 +174,8 @@ ok $mb, "Module::Build->new_from_context";
   $output = stdout_of( sub { $ran_ok = $mb->do_system(@make, 'test', 'TEST_VERBOSE=0') } );
   ok $ran_ok, "make test without verbose ran ok";
   $output =~ s/^/# /gm;  # Don't confuse our own test output
-  like $output, qr/(?:# .+basic\.+ok\s+(?:[\d.]+\s*m?s\s*)?)# All tests/,
+  like $output,
+       qr/(?:# .+basic\.+ok\s+(?:[\d.]+\s*m?s\s*)?(?:# \[[\d:]+\]\s*)?)# All tests/,
       'Should be non-verbose';
 
   $mb->delete_filetree($libdir);