r24407 - in /branches/upstream/libipc-pubsub-perl/current: ./ inc/Module/ inc/Module/Install/ lib/IPC/ lib/IPC/PubSub/Cache/

yvesago-guest at users.alioth.debian.org yvesago-guest at users.alioth.debian.org
Mon Aug 18 08:13:00 UTC 2008


Author: yvesago-guest
Date: Mon Aug 18 08:12:56 2008
New Revision: 24407

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=24407
Log:
[svn-upgrade] Integrating new upstream version, libipc-pubsub-perl (0.28)

Modified:
    branches/upstream/libipc-pubsub-perl/current/Changes
    branches/upstream/libipc-pubsub-perl/current/META.yml
    branches/upstream/libipc-pubsub-perl/current/Makefile.PL
    branches/upstream/libipc-pubsub-perl/current/SIGNATURE
    branches/upstream/libipc-pubsub-perl/current/inc/Module/Install.pm
    branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Base.pm
    branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Can.pm
    branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Fetch.pm
    branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Makefile.pm
    branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Metadata.pm
    branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Win32.pm
    branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/WriteAll.pm
    branches/upstream/libipc-pubsub-perl/current/lib/IPC/PubSub.pm
    branches/upstream/libipc-pubsub-perl/current/lib/IPC/PubSub/Cache/DBM_Deep.pm

Modified: branches/upstream/libipc-pubsub-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libipc-pubsub-perl/current/Changes?rev=24407&op=diff
==============================================================================
--- branches/upstream/libipc-pubsub-perl/current/Changes (original)
+++ branches/upstream/libipc-pubsub-perl/current/Changes Mon Aug 18 08:12:56 2008
@@ -1,3 +1,11 @@
+[Changes for 0.28 - 2008-08-15]
+
+* We now require DBM::Deep 1.00 or later.
+
+* Improved data consistency in DBM::Deep backend so it won't sometimes
+  die with a "not an ARRAY reference" message.
+  Reported by: Matthew Pitts
+
 [Changes for 0.27 - 2007-10-09]
 
 * Adjust tests so it no longer fails with newer versions of DBM::Deep.

Modified: branches/upstream/libipc-pubsub-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libipc-pubsub-perl/current/META.yml?rev=24407&op=diff
==============================================================================
--- branches/upstream/libipc-pubsub-perl/current/META.yml (original)
+++ branches/upstream/libipc-pubsub-perl/current/META.yml Mon Aug 18 08:12:56 2008
@@ -1,8 +1,9 @@
 --- 
 abstract: Interprocess Publish/Subscribe channels
-author: Audrey Tang <cpan at audreyt.org>
+author: 
+  - Audrey Tang <cpan at audreyt.org>
 distribution_type: module
-generated_by: Module::Install version 0.67
+generated_by: Module::Install version 0.68
 license: MIT
 meta-spec: 
   url: http://module-build.sourceforge.net/META-spec-v1.3.html
@@ -14,8 +15,9 @@
     - t
 requires: 
   Class::Accessor::Fast: 0
-  DBM::Deep: 0
+  DBM::Deep: 1.00
   Data::UUID: 0
+  Storable: 0
   Time::HiRes: 0
   perl: 5.6.0
-version: 0.27
+version: 0.28

Modified: branches/upstream/libipc-pubsub-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libipc-pubsub-perl/current/Makefile.PL?rev=24407&op=diff
==============================================================================
--- branches/upstream/libipc-pubsub-perl/current/Makefile.PL (original)
+++ branches/upstream/libipc-pubsub-perl/current/Makefile.PL Mon Aug 18 08:12:56 2008
@@ -5,8 +5,9 @@
 license     'MIT';
 all_from    'lib/IPC/PubSub.pm';
 
+requires    'Storable';
 requires    'Time::HiRes';
-requires    'DBM::Deep';
+requires    'DBM::Deep' => '1.00';
 requires    'Data::UUID';
 requires    'Class::Accessor::Fast';
 

Modified: branches/upstream/libipc-pubsub-perl/current/SIGNATURE
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libipc-pubsub-perl/current/SIGNATURE?rev=24407&op=diff
==============================================================================
--- branches/upstream/libipc-pubsub-perl/current/SIGNATURE (original)
+++ branches/upstream/libipc-pubsub-perl/current/SIGNATURE Mon Aug 18 08:12:56 2008
@@ -14,22 +14,22 @@
 -----BEGIN PGP SIGNED MESSAGE-----
 Hash: SHA1
 
-SHA1 9d2cd06a76b890aa4de33fda2761aaa5bddce6b6 Changes
+SHA1 8dab1d7a3df4b31edcb70b9c1f389e16694ad214 Changes
 SHA1 86de90f247630310db0c9d7677f3dc7248400928 MANIFEST
-SHA1 5f5cd97cb12e8fa44d24a1f76077d30d79e2b43b META.yml
-SHA1 41614b2a3cd5f97787cfa46aa79f65d81b25f70f Makefile.PL
+SHA1 2be74a66af16824ef189ea5a4647ec8f96d475a7 META.yml
+SHA1 1efb0dda270171a9accec4db6643c6d9b81d6e78 Makefile.PL
 SHA1 7edc5bba981fd5d734a9a095b3bddfed8d1acda0 README
-SHA1 78edb89a439463e44c33a72bbee84c54d0dc8aaf inc/Module/Install.pm
-SHA1 8ea4e37df83fd0c1c050be5c8da75545c3828d9b inc/Module/Install/Base.pm
-SHA1 1da6031583c32f0d1ec073b8376102fc51427dcc inc/Module/Install/Can.pm
-SHA1 b779375b90c16af2f31f38a1dd2b5df223c7f2fb inc/Module/Install/Fetch.pm
-SHA1 2054450e1e9c1dd8056362bf4a64ae70d5d71476 inc/Module/Install/Makefile.pm
-SHA1 5d6189b2cad15cf9932a28faafd55130c8247e83 inc/Module/Install/Metadata.pm
-SHA1 02af973fae2ac3531fa6b704574b2b8cb2a08148 inc/Module/Install/Win32.pm
-SHA1 3a2eab96e91cca8d99938cda7791759ae9d97b3a inc/Module/Install/WriteAll.pm
-SHA1 a284fa09ad3457bf03e9efdb28d00821c5218285 lib/IPC/PubSub.pm
+SHA1 7e2cfa1b9efe0d502ee57717649c90ba4bd28ba9 inc/Module/Install.pm
+SHA1 6e1392d80a0f239eecd5664f7f21f922cedb9329 inc/Module/Install/Base.pm
+SHA1 f69417fe831d9cc22a78f00a617afadceade4d81 inc/Module/Install/Can.pm
+SHA1 c61d02895330310048bf388881b5e2e064031561 inc/Module/Install/Fetch.pm
+SHA1 54fcbed19232ec959bb17cfb4410599afc7f0779 inc/Module/Install/Makefile.pm
+SHA1 7d3be9b158e37b2b2c22084740099955623b1d56 inc/Module/Install/Metadata.pm
+SHA1 0a8b66180229ba2f9deaea1fedd0aacf7a7ace6b inc/Module/Install/Win32.pm
+SHA1 d3352eb33fe43a5f3ead513f645224fe34d73bc9 inc/Module/Install/WriteAll.pm
+SHA1 05f8adad5cad991d73499ee9dbcfba3fa59bbe56 lib/IPC/PubSub.pm
 SHA1 0ed23d984f0dc09d76ed50c16a2b0aeaa71c8648 lib/IPC/PubSub/Cache.pm
-SHA1 fde1bf31e8ce2fd3b8d7eb419af0e360d4280e32 lib/IPC/PubSub/Cache/DBM_Deep.pm
+SHA1 80b988a5d95ecb1689d58052cb139cf54ff482a4 lib/IPC/PubSub/Cache/DBM_Deep.pm
 SHA1 4a865e5f6443b2fc2cd44e4b1e9aa9aba110b9c0 lib/IPC/PubSub/Cache/JiftyDBI.pm
 SHA1 a6f3aee0362d3e8e9f7d063f5e40bbd8c6f0815e lib/IPC/PubSub/Cache/JiftyDBI/Stash.pm
 SHA1 3b270ac2da87b439cde2a2755d1bea3b2a578a05 lib/IPC/PubSub/Cache/JiftyDBI/Stash/Item.pm
@@ -43,7 +43,7 @@
 -----BEGIN PGP SIGNATURE-----
 Version: GnuPG v1.4.3 (Darwin)
 
-iD8DBQFHCy7TtLPdNzw1AaARAiomAJ9Bd0sF0LhdRYAceqh12KDWkjqgHwCfd1k4
-tB2iKTfjcZa3oZ3vD5bYD90=
-=Hy40
+iD8DBQFIpGHStLPdNzw1AaARAmzGAJwJldKSqMxjF8efMJ1IevlLndtToQCbBCh4
+tfkBv8DNKEVKzESDSzJJAcw=
+=RTp8
 -----END PGP SIGNATURE-----

Modified: branches/upstream/libipc-pubsub-perl/current/inc/Module/Install.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libipc-pubsub-perl/current/inc/Module/Install.pm?rev=24407&op=diff
==============================================================================
--- branches/upstream/libipc-pubsub-perl/current/inc/Module/Install.pm (original)
+++ branches/upstream/libipc-pubsub-perl/current/inc/Module/Install.pm Mon Aug 18 08:12:56 2008
@@ -28,7 +28,7 @@
     # This is not enforced yet, but will be some time in the next few
     # releases once we can make sure it won't clash with custom
     # Module::Install extensions.
-    $VERSION = '0.67';
+    $VERSION = '0.68';
 }
 
 # Whether or not inc::Module::Install is actually loaded, the

Modified: branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Base.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Base.pm?rev=24407&op=diff
==============================================================================
--- branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Base.pm (original)
+++ branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Base.pm Mon Aug 18 08:12:56 2008
@@ -1,7 +1,7 @@
 #line 1
 package Module::Install::Base;
 
-$VERSION = '0.67';
+$VERSION = '0.68';
 
 # Suspend handler for "redefined" warnings
 BEGIN {

Modified: branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Can.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Can.pm?rev=24407&op=diff
==============================================================================
--- branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Can.pm (original)
+++ branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Can.pm Mon Aug 18 08:12:56 2008
@@ -11,7 +11,7 @@
 
 use vars qw{$VERSION $ISCORE @ISA};
 BEGIN {
-	$VERSION = '0.67';
+	$VERSION = '0.68';
 	$ISCORE  = 1;
 	@ISA     = qw{Module::Install::Base};
 }

Modified: branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Fetch.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Fetch.pm?rev=24407&op=diff
==============================================================================
--- branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Fetch.pm (original)
+++ branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Fetch.pm Mon Aug 18 08:12:56 2008
@@ -6,7 +6,7 @@
 
 use vars qw{$VERSION $ISCORE @ISA};
 BEGIN {
-	$VERSION = '0.67';
+	$VERSION = '0.68';
 	$ISCORE  = 1;
 	@ISA     = qw{Module::Install::Base};
 }

Modified: branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Makefile.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Makefile.pm?rev=24407&op=diff
==============================================================================
--- branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Makefile.pm (original)
+++ branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Makefile.pm Mon Aug 18 08:12:56 2008
@@ -7,7 +7,7 @@
 
 use vars qw{$VERSION $ISCORE @ISA};
 BEGIN {
-	$VERSION = '0.67';
+	$VERSION = '0.68';
 	$ISCORE  = 1;
 	@ISA     = qw{Module::Install::Base};
 }

Modified: branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Metadata.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Metadata.pm?rev=24407&op=diff
==============================================================================
--- branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Metadata.pm (original)
+++ branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Metadata.pm Mon Aug 18 08:12:56 2008
@@ -6,7 +6,7 @@
 
 use vars qw{$VERSION $ISCORE @ISA};
 BEGIN {
-	$VERSION = '0.67';
+	$VERSION = '0.68';
 	$ISCORE  = 1;
 	@ISA     = qw{Module::Install::Base};
 }

Modified: branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Win32.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Win32.pm?rev=24407&op=diff
==============================================================================
--- branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Win32.pm (original)
+++ branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/Win32.pm Mon Aug 18 08:12:56 2008
@@ -6,7 +6,7 @@
 
 use vars qw{$VERSION $ISCORE @ISA};
 BEGIN {
-	$VERSION = '0.67';
+	$VERSION = '0.68';
 	$ISCORE  = 1;
 	@ISA     = qw{Module::Install::Base};
 }

Modified: branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/WriteAll.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/WriteAll.pm?rev=24407&op=diff
==============================================================================
--- branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/WriteAll.pm (original)
+++ branches/upstream/libipc-pubsub-perl/current/inc/Module/Install/WriteAll.pm Mon Aug 18 08:12:56 2008
@@ -6,7 +6,7 @@
 
 use vars qw{$VERSION $ISCORE @ISA};
 BEGIN {
-	$VERSION = '0.67';
+	$VERSION = '0.68';
 	$ISCORE  = 1;
 	@ISA     = qw{Module::Install::Base};
 }

Modified: branches/upstream/libipc-pubsub-perl/current/lib/IPC/PubSub.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libipc-pubsub-perl/current/lib/IPC/PubSub.pm?rev=24407&op=diff
==============================================================================
--- branches/upstream/libipc-pubsub-perl/current/lib/IPC/PubSub.pm (original)
+++ branches/upstream/libipc-pubsub-perl/current/lib/IPC/PubSub.pm Mon Aug 18 08:12:56 2008
@@ -1,5 +1,5 @@
 package IPC::PubSub;
-$IPC::PubSub::VERSION = '0.27';
+$IPC::PubSub::VERSION = '0.28';
 
 use 5.006;
 use strict;

Modified: branches/upstream/libipc-pubsub-perl/current/lib/IPC/PubSub/Cache/DBM_Deep.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libipc-pubsub-perl/current/lib/IPC/PubSub/Cache/DBM_Deep.pm?rev=24407&op=diff
==============================================================================
--- branches/upstream/libipc-pubsub-perl/current/lib/IPC/PubSub/Cache/DBM_Deep.pm (original)
+++ branches/upstream/libipc-pubsub-perl/current/lib/IPC/PubSub/Cache/DBM_Deep.pm Mon Aug 18 08:12:56 2008
@@ -2,13 +2,18 @@
 use strict;
 use warnings;
 use base 'IPC::PubSub::Cache';
+use Storable qw/ nfreeze thaw /;
 use DBM::Deep;
 use File::Temp qw/ tempfile /;
 
 sub new {
     my $class = shift;
     my $file  = shift;
-    my $mem = DBM::Deep->new($file || $class->default_config);
+    my $mem = DBM::Deep->new(
+        file        => ((defined $file and length $file) ? $file : $class->default_config),
+        locking     => 1,
+        autoflush   => 1,
+    );
     bless(\$mem, $class);
 }
 
@@ -19,12 +24,12 @@
 
 sub fetch {
     my $self = shift;
-    map { $$self->get($_) } @_;
+    return map { thaw($$self->get($_)) } @_;
 }
 
 sub store {
     my ($self, $key, $val, $time, $expiry) = @_;
-    $$self->put($key, [$time, $val]);
+    $$self->put($key => nfreeze([$time, $val]));
 }
 
 sub publisher_indices {




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