[PATCH] DB_File 1.819
authorPaul Marquess <Paul.Marquess@ntlworld.com>
Thu, 19 Feb 2009 09:15:01 +0000 (09:15 +0000)
committerDavid Mitchell <davem@iabyn.com>
Tue, 14 Apr 2009 22:38:42 +0000 (23:38 +0100)
Small change to t/db-recno.t [RT# 43288]

Message-ID: <00ad01c99214$89f5fa50$9de1eef0$@Marquess@ntlworld.com>

(cherry picked from commit 4300f93b02bb2e0a466478acdc265d15a6154f4c)

ext/DB_File/Changes
ext/DB_File/DB_File.pm
ext/DB_File/t/db-recno.t

index 1036545..ec6b819 100644 (file)
@@ -1,5 +1,10 @@
 
 
+1.819 18 February 2009
+
+   * t/db-recno.t fails if run in a path that contains spaces
+     [rt.cpan.org #43288]
+
 1.818 21 January 2009
 
    * Updated Makefile.PL for Strawberry Perl. 
index 105f121..536f1a4 100644 (file)
@@ -165,7 +165,7 @@ our ($db_version, $use_XSLoader, $splice_end_array, $Error);
 use Carp;
 
 
-$VERSION = "1.818" ;
+$VERSION = "1.819" ;
 $VERSION = eval $VERSION; # needed for dev releases
 
 {
index 1eed35b..3eb6968 100755 (executable)
@@ -1477,7 +1477,7 @@ sub test_splice {
 
     foreach ($ms_error, @ms_warnings) {
        chomp;
-       s/ at \S+ line \d+\.?.*//s;
+    s/ at \S+(\s+\S+)*? line \d+\.?.*//s;
     }
 
     return "different errors: '$s_error' vs '$ms_error'"