r71155 - in /trunk/libdbm-deep-perl: Changes META.yml README debian/changelog 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:04:05 UTC 2011 

Author: ansgar
Date: Fri Mar 11 13:03:45 2011
New Revision: 71155

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=71155
Log:
IGNORE-VERSION: 2.0004-1
Only changes to tests.

Modified:
    trunk/libdbm-deep-perl/Changes
    trunk/libdbm-deep-perl/META.yml
    trunk/libdbm-deep-perl/README
    trunk/libdbm-deep-perl/debian/changelog
    trunk/libdbm-deep-perl/lib/DBM/Deep.pm
    trunk/libdbm-deep-perl/lib/DBM/Deep.pod
    trunk/libdbm-deep-perl/lib/DBM/Deep/Internals.pod
    trunk/libdbm-deep-perl/t/27_filehandle.t
    trunk/libdbm-deep-perl/t/43_transaction_maximum.t

Modified: trunk/libdbm-deep-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbm-deep-perl/Changes?rev=71155&op=diff
==============================================================================
--- trunk/libdbm-deep-perl/Changes (original)
+++ trunk/libdbm-deep-perl/Changes Fri Mar 11 13:03:45 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: trunk/libdbm-deep-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbm-deep-perl/META.yml?rev=71155&op=diff
==============================================================================
--- trunk/libdbm-deep-perl/META.yml (original)
+++ trunk/libdbm-deep-perl/META.yml Fri Mar 11 13:03:45 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: trunk/libdbm-deep-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbm-deep-perl/README?rev=71155&op=diff
==============================================================================
--- trunk/libdbm-deep-perl/README (original)
+++ trunk/libdbm-deep-perl/README Fri Mar 11 13:03:45 2011
@@ -3,7 +3,7 @@
     transactions
 
 VERSION
-    2.0002
+    2.0004
 
 SYNOPSIS
       use DBM::Deep;

Modified: trunk/libdbm-deep-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbm-deep-perl/debian/changelog?rev=71155&op=diff
==============================================================================
--- trunk/libdbm-deep-perl/debian/changelog (original)
+++ trunk/libdbm-deep-perl/debian/changelog Fri Mar 11 13:03:45 2011
@@ -1,8 +1,11 @@
-libdbm-deep-perl (2.0002-2) UNRELEASED; urgency=low
+libdbm-deep-perl (2.0004-1) UNRELEASED; urgency=low
+
+  IGNORE-VERSION: 2.0004-1
+  Only changes to tests.
 
   * Update my email address.
 
- -- Ansgar Burchardt <ansgar at debian.org>  Mon, 01 Nov 2010 11:16:39 +0100
+ -- Ansgar Burchardt <ansgar at debian.org>  Fri, 11 Mar 2011 14:02:33 +0100
 
 libdbm-deep-perl (2.0002-1) unstable; urgency=medium
 

Modified: trunk/libdbm-deep-perl/lib/DBM/Deep.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbm-deep-perl/lib/DBM/Deep.pm?rev=71155&op=diff
==============================================================================
--- trunk/libdbm-deep-perl/lib/DBM/Deep.pm (original)
+++ trunk/libdbm-deep-perl/lib/DBM/Deep.pm Fri Mar 11 13:03:45 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: trunk/libdbm-deep-perl/lib/DBM/Deep.pod
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbm-deep-perl/lib/DBM/Deep.pod?rev=71155&op=diff
==============================================================================
--- trunk/libdbm-deep-perl/lib/DBM/Deep.pod (original)
+++ trunk/libdbm-deep-perl/lib/DBM/Deep.pod Fri Mar 11 13:03:45 2011
@@ -4,7 +4,7 @@
 
 =head1 VERSION
 
-2.0002
+2.0004
 
 =head1 SYNOPSIS
 

Modified: trunk/libdbm-deep-perl/lib/DBM/Deep/Internals.pod
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbm-deep-perl/lib/DBM/Deep/Internals.pod?rev=71155&op=diff
==============================================================================
--- trunk/libdbm-deep-perl/lib/DBM/Deep/Internals.pod (original)
+++ trunk/libdbm-deep-perl/lib/DBM/Deep/Internals.pod Fri Mar 11 13:03:45 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: trunk/libdbm-deep-perl/t/27_filehandle.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbm-deep-perl/t/27_filehandle.t?rev=71155&op=diff
==============================================================================
--- trunk/libdbm-deep-perl/t/27_filehandle.t (original)
+++ trunk/libdbm-deep-perl/t/27_filehandle.t Fri Mar 11 13:03:45 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: trunk/libdbm-deep-perl/t/43_transaction_maximum.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbm-deep-perl/t/43_transaction_maximum.t?rev=71155&op=diff
==============================================================================
--- trunk/libdbm-deep-perl/t/43_transaction_maximum.t (original)
+++ trunk/libdbm-deep-perl/t/43_transaction_maximum.t Fri Mar 11 13:03:45 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