2.56 bump in order to dual-live with perl 5.24

Storable-2.53-Upgrade-to-2.56.patch

@@ -0,0 +1,99 @@
+diff --git a/Storable.pm b/Storable.pm
+index 9d8b621..c8f6db1 100644
+--- a/Storable.pm
++++ b/Storable.pm
+@@ -22,7 +22,7 @@ package Storable; @ISA = qw(Exporter);
+ 
+ use vars qw($canonical $forgive_me $VERSION);
+ 
+-$VERSION = '2.53';
++$VERSION = '2.56';
+ 
+ BEGIN {
+     if (eval { local $SIG{__DIE__}; require Log::Agent; 1 }) {
+@@ -979,43 +979,43 @@ such.
+ 
+ Here are some code samples showing a possible usage of Storable:
+ 
+-	use Storable qw(store retrieve freeze thaw dclone);
++ use Storable qw(store retrieve freeze thaw dclone);
+ 
+-	%color = ('Blue' => 0.1, 'Red' => 0.8, 'Black' => 0, 'White' => 1);
++ %color = ('Blue' => 0.1, 'Red' => 0.8, 'Black' => 0, 'White' => 1);
+ 
+-	store(\%color, 'mycolors') or die "Can't store %a in mycolors!\n";
++ store(\%color, 'mycolors') or die "Can't store %a in mycolors!\n";
+ 
+-	$colref = retrieve('mycolors');
+-	die "Unable to retrieve from mycolors!\n" unless defined $colref;
+-	printf "Blue is still %lf\n", $colref->{'Blue'};
++ $colref = retrieve('mycolors');
++ die "Unable to retrieve from mycolors!\n" unless defined $colref;
++ printf "Blue is still %lf\n", $colref->{'Blue'};
+ 
+-	$colref2 = dclone(\%color);
++ $colref2 = dclone(\%color);
+ 
+-	$str = freeze(\%color);
+-	printf "Serialization of %%color is %d bytes long.\n", length($str);
+-	$colref3 = thaw($str);
++ $str = freeze(\%color);
++ printf "Serialization of %%color is %d bytes long.\n", length($str);
++ $colref3 = thaw($str);
+ 
+ which prints (on my machine):
+ 
+-	Blue is still 0.100000
+-	Serialization of %color is 102 bytes long.
++ Blue is still 0.100000
++ Serialization of %color is 102 bytes long.
+ 
+ Serialization of CODE references and deserialization in a safe
+ compartment:
+ 
+ =for example begin
+ 
+-	use Storable qw(freeze thaw);
+-	use Safe;
+-	use strict;
+-	my $safe = new Safe;
++ use Storable qw(freeze thaw);
++ use Safe;
++ use strict;
++ my $safe = new Safe;
+         # because of opcodes used in "use strict":
+-	$safe->permit(qw(:default require));
+-	local $Storable::Deparse = 1;
+-	local $Storable::Eval = sub { $safe->reval($_[0]) };
+-	my $serialized = freeze(sub { 42 });
+-	my $code = thaw($serialized);
+-	$code->() == 42;
++ $safe->permit(qw(:default require));
++ local $Storable::Deparse = 1;
++ local $Storable::Eval = sub { $safe->reval($_[0]) };
++ my $serialized = freeze(sub { 42 });
++ my $code = thaw($serialized);
++ $code->() == 42;
+ 
+ =for example end
+ 
+diff --git a/Storable.xs b/Storable.xs
+index e7d0329..83cd001 100644
+--- a/Storable.xs
++++ b/Storable.xs
+@@ -1667,6 +1667,7 @@ static void free_context(pTHX_ stcxt_t *cxt)
+ 
+ 	ASSERT(!cxt->s_dirty, ("clean context"));
+ 	ASSERT(prev, ("not freeing root context"));
++	assert(prev);
+ 
+ 	SvREFCNT_dec(cxt->my_sv);
+ 	SET_STCXT(prev);
+@@ -6677,6 +6678,7 @@ SV *	obj
+  ALIAS:
+   net_mstore = 1
+  CODE:
++  RETVAL = &PL_sv_undef;
+   if (!do_store(aTHX_ (PerlIO*) 0, obj, 0, ix, &RETVAL))
+     RETVAL = &PL_sv_undef;
+  OUTPUT:

perl-Storable.spec

@@ -2,15 +2,17 @@
 
 Name:           perl-Storable
 Epoch:          1
-Version:        2.53
-Release:        347%{?dist}
+Version:        2.56
+Release:        1%{?dist}
 Summary:        Persistence for Perl data structures
 License:        GPL+ or Artistic
 Group:          Development/Libraries
 URL:            http://search.cpan.org/dist/Storable/
 Source0:        http://www.cpan.org/authors/id/A/AM/AMS/Storable-%{base_version}.tar.gz
-# Unbundled form perl 5.21.11
+# Unbundled from perl 5.21.11
 Patch0:         Storable-2.51-Upgrade-to-2.53.patch
+# Unbundled from perl 5.24.0
+Patch1:         Storable-2.53-Upgrade-to-2.56.patch
 BuildRequires:  perl
 BuildRequires:  perl(Config)
 BuildRequires:  perl(ExtUtils::MakeMaker)
@@ -61,6 +63,7 @@ can be conveniently stored to disk and retrieved at a later time.
 %prep
 %setup -q -n Storable-%{base_version}
 %patch0 -p1
+%patch1 -p1
 # Remove bundled modules
 rm -rf t/compat
 sed -i -e '/^t\/compat\//d' MANIFEST
@@ -87,6 +90,9 @@ make test
 %{_mandir}/man3/*
 
 %changelog
+* Wed May 11 2016 Jitka Plesnikova <jplesnik@redhat.com> - 2.56-1
+- 2.56 bump in order to dual-live with perl 5.24
+
 * Thu Feb 04 2016 Fedora Release Engineering <releng@fedoraproject.org> - 1:2.53-347
 - Rebuilt for https://fedoraproject.org/wiki/Fedora_24_Mass_Rebuild