r71153 - in /branches/upstream/libdbm-deep-perl/current: Changes META.yml README lib/DBM/Deep.pm lib/DBM/Deep.pod lib/DBM/Deep/Internals.pod t/27_filehandle.t t/43_transaction_maximum.t

ansgar at users.alioth.debian.org ansgar at users.alioth.debian.org
Fri Mar 11 13:01:25 UTC 2011 

Author: ansgar
Date: Fri Mar 11 13:00:59 2011
New Revision: 71153

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=71153
Log:
[svn-upgrade] new version libdbm-deep-perl (2.0004)

Modified:
    branches/upstream/libdbm-deep-perl/current/Changes
    branches/upstream/libdbm-deep-perl/current/META.yml
    branches/upstream/libdbm-deep-perl/current/README
    branches/upstream/libdbm-deep-perl/current/lib/DBM/Deep.pm
    branches/upstream/libdbm-deep-perl/current/lib/DBM/Deep.pod
    branches/upstream/libdbm-deep-perl/current/lib/DBM/Deep/Internals.pod
    branches/upstream/libdbm-deep-perl/current/t/27_filehandle.t
    branches/upstream/libdbm-deep-perl/current/t/43_transaction_maximum.t

Modified: branches/upstream/libdbm-deep-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbm-deep-perl/current/Changes?rev=71153&op=diff
==============================================================================
--- branches/upstream/libdbm-deep-perl/current/Changes (original)
+++ branches/upstream/libdbm-deep-perl/current/Changes Fri Mar 11 13:00:59 2011
@@ -1,4 +1,11 @@
 Revision history for DBM::Deep (ordered by revision number).
+
+2.0004 Sep 12 18:38:00 2010 PDT
+    - t/27_filehandle.t has been fixed to work with Test::More 2.
+
+2.0003 Sep 12 12:02:00 2010 PDT
+    - t/43_transaction_maximum.t has been fixed. It was broken in the
+      previous release for systems that will only open so many files.
 
 2.0002 Sep 5 12:35:00 2010 PDT
     - Error messages from DBM::Deep now use the caller’s file name.

Modified: branches/upstream/libdbm-deep-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbm-deep-perl/current/META.yml?rev=71153&op=diff
==============================================================================
--- branches/upstream/libdbm-deep-perl/current/META.yml (original)
+++ branches/upstream/libdbm-deep-perl/current/META.yml Fri Mar 11 13:00:59 2011
@@ -23,7 +23,7 @@
 provides:
   DBM::Deep:
     file: lib/DBM/Deep.pm
-    version: 2.0002
+    version: 2.0004
   DBM::Deep::Array:
     file: lib/DBM/Deep/Array.pm
   DBM::Deep::Engine:
@@ -81,4 +81,4 @@
   perl: 5.008_004
 resources:
   license: http://dev.perl.org/licenses/
-version: 2.0002
+version: 2.0004

Modified: branches/upstream/libdbm-deep-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbm-deep-perl/current/README?rev=71153&op=diff
==============================================================================
--- branches/upstream/libdbm-deep-perl/current/README (original)
+++ branches/upstream/libdbm-deep-perl/current/README Fri Mar 11 13:00:59 2011
@@ -3,7 +3,7 @@
     transactions
 
 VERSION
-    2.0002
+    2.0004
 
 SYNOPSIS
       use DBM::Deep;

Modified: branches/upstream/libdbm-deep-perl/current/lib/DBM/Deep.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbm-deep-perl/current/lib/DBM/Deep.pm?rev=71153&op=diff
==============================================================================
--- branches/upstream/libdbm-deep-perl/current/lib/DBM/Deep.pm (original)
+++ branches/upstream/libdbm-deep-perl/current/lib/DBM/Deep.pm Fri Mar 11 13:00:59 2011
@@ -6,7 +6,7 @@
 use warnings FATAL => 'all';
 no warnings 'recursion';
 
-our $VERSION = q(2.0002);
+our $VERSION = q(2.0004);
 
 use Scalar::Util ();
 

Modified: branches/upstream/libdbm-deep-perl/current/lib/DBM/Deep.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbm-deep-perl/current/lib/DBM/Deep.pod?rev=71153&op=diff
==============================================================================
--- branches/upstream/libdbm-deep-perl/current/lib/DBM/Deep.pod (original)
+++ branches/upstream/libdbm-deep-perl/current/lib/DBM/Deep.pod Fri Mar 11 13:00:59 2011
@@ -4,7 +4,7 @@
 
 =head1 VERSION
 
-2.0002
+2.0004
 
 =head1 SYNOPSIS
 

Modified: branches/upstream/libdbm-deep-perl/current/lib/DBM/Deep/Internals.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbm-deep-perl/current/lib/DBM/Deep/Internals.pod?rev=71153&op=diff
==============================================================================
--- branches/upstream/libdbm-deep-perl/current/lib/DBM/Deep/Internals.pod (original)
+++ branches/upstream/libdbm-deep-perl/current/lib/DBM/Deep/Internals.pod Fri Mar 11 13:00:59 2011
@@ -57,7 +57,7 @@
 The file header consists of two parts. The first part is a fixed length of
 13 bytes:
 
-  DBDP h VVVV SSSS
+  DPDB h VVVV SSSS
   \  / |    \   \
    \/  '---. \   '--- size of the second part of the header
   file      \ '--- version

Modified: branches/upstream/libdbm-deep-perl/current/t/27_filehandle.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbm-deep-perl/current/t/27_filehandle.t?rev=71153&op=diff
==============================================================================
--- branches/upstream/libdbm-deep-perl/current/t/27_filehandle.t (original)
+++ branches/upstream/libdbm-deep-perl/current/t/27_filehandle.t Fri Mar 11 13:00:59 2011
@@ -60,10 +60,12 @@
 
     print $fh "#!$^X\n";
     print $fh <<"__END_FH__";
-use strict;
 use Test::More 'no_plan';
 Test::More->builder->no_ending(1);
-Test::More->builder->{Curr_Test} = $pre_fork_tests;
+if(INC->{"Test/Builder2/History.pm"}) {
+ Test::More->builder->{History}->counter->set($pre_fork_tests);
+}
+else { Test::More->builder->{Curr_Test} = $pre_fork_tests; }
 
 use_ok( 'DBM::Deep' );
 

Modified: branches/upstream/libdbm-deep-perl/current/t/43_transaction_maximum.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbm-deep-perl/current/t/43_transaction_maximum.t?rev=71153&op=diff
==============================================================================
--- branches/upstream/libdbm-deep-perl/current/t/43_transaction_maximum.t (original)
+++ branches/upstream/libdbm-deep-perl/current/t/43_transaction_maximum.t Fri Mar 11 13:00:59 2011
@@ -26,7 +26,7 @@
         # our test because of that.
         scalar(
          $@ =~ /Cannot sysopen file/ && (
-          $reached_max++ or $max_txns = $_ - 1
+          $reached_max++ or $max_txns = $_
          ),
          ()
         )

More information about the Pkg-perl-cvs-commits mailing list