[Module-build-checkins] [svn:Module-Build] r5967 - in Module-Build/trunk: . t

[<kwi...@cv...>]

Author: kwilliams
Date: Wed Apr 26 19:35:58 2006
New Revision: 5967

Modified:
   Module-Build/trunk/Changes
   Module-Build/trunk/t/compat.t

Log:
Fix our screen scraping for recent Test::Harnesses

Modified: Module-Build/trunk/Changes
==============================================================================
--- Module-Build/trunk/Changes	(original)
+++ Module-Build/trunk/Changes	Wed Apr 26 19:35:58 2006
@@ -2,12 +2,17 @@
 
 0.27_11
 
- - Add new method ask(), that's intended to provide a better tool for
+ - Add new method ask(), intended to provide a more complete tool for
    authors to query users when performing a build. It provides better
    support for unattended builds as well as providing better
    validation of input. This new method is preferred over prompt() and
    y_n().
 
+ - When y_n() or prompt() are called without a default value and the
+   build seems to be unattended (e.g. in automatic CPAN testing), we
+   now die() with an error message rather than silently returning
+   undef for prompt(), or looping indefinitely for y_n().
+
  - When searching for '.modulebuildrc', return the first HOME-like
    directory that actually contains the file instead of the first
    existing directory. Document the search locations and the order
@@ -24,6 +29,10 @@
  - copy_if_modified() now preserves the executable bit of the source
    file. [Spotted by Julian Mehnle]
 
+ - Fixed compatibility of our screen-scraping the Test::Harness output
+   so we can recognize the most recent Test::Harness version. [Steve
+   Hay]
+
  - Backing out a requirement added in 0.27_06 on the method y_n()
    to always include a default. This behavior would cause existing
    build scripts to start failing. We now fail with a missing default

Modified: Module-Build/trunk/t/compat.t
==============================================================================
--- Module-Build/trunk/t/compat.t	(original)
+++ Module-Build/trunk/t/compat.t	Wed Apr 26 19:35:58 2006
@@ -143,7 +143,7 @@
   $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*m?s\s*)?)# All tests/,
       'Should be non-verbose';
 
   $mb->delete_filetree($libdir);