Re: [PATCH] Storable (Re: perl@16433)

Message-ID: <20020507222600.GC306@Bagpuss.unfortu.net>

p4raw-id: //depot/perl@16457

diff --git a/ext/Storable/MANIFEST b/ext/Storable/MANIFEST
index e823e48..1cdb74c 100644 (file)
--- a/ext/Storable/MANIFEST
+++ b/ext/Storable/MANIFEST
@@ -4,3 +4,25 @@ Makefile.PL                Generic Makefile template
 Storable.pm                The perl side of Storable
 Storable.xs                The C side of Storable
 ChangeLog                  Changes since baseline
+t/blessed.t                See if Storable works
+t/canonical.t              See if Storable works
+t/compat06.t               See if Storable works
+t/croak.t                  See if Storable works
+t/dclone.t                 See if Storable works
+t/downgrade.t              See if Storable works
+t/forgive.t                See if Storable works
+t/freeze.t                 See if Storable works
+t/lock.t                   See if Storable works
+t/make_downgrade.pl        See if Storable works
+t/malice.t                 See if Storable copes with corrupt files
+t/overload.t               See if Storable works
+t/recurse.t                See if Storable works
+t/restrict.t               See if Storable works
+t/retrieve.t               See if Storable works
+t/store.t                  See if Storable works
+t/tied.t                   See if Storable works
+t/tied_hook.t              See if Storable works
+t/tied_items.t             See if Storable works
+t/utf8.t                   See if Storable works
+t/utf8hash.t               See if Storable works
+lib/st-dump.pl             helper routines for tests

diff --git a/ext/Storable/Makefile.PL b/ext/Storable/Makefile.PL
index c8151f3..a102ea3 100644 (file)
--- a/ext/Storable/Makefile.PL
+++ b/ext/Storable/Makefile.PL
@@ -20,6 +20,7 @@ WriteMakefile(
     'NAME'                     => 'Storable',
     'DISTNAME'         => "Storable",
        'MAN3PODS'              => {},
+    PREREQ_PM          => {'Test::More' => 0},
     'VERSION_FROM'     => 'Storable.pm',
     'dist'                     => { SUFFIX => 'gz', COMPRESS => 'gzip -f' },
 );

diff --git a/ext/Storable/README b/ext/Storable/README
index 6dfa689..87c942a 100644 (file)
--- a/ext/Storable/README
+++ b/ext/Storable/README
@@ -1,5 +1,6 @@
-                         Storable 1.0
+                         Storable 1.015
                Copyright (c) 1995-2000, Raphael Manfredi
+               Copyright (c) 2001,2002, Larry Wall
 
 ------------------------------------------------------------------------
     This program is free software; you can redistribute it and/or modify
@@ -13,9 +14,9 @@
 
 +=======================================================================
 | Storable is distributed as a module, but is also part of the official
-| Perl core distribution.  Maintenance is still done by the Author,
-| whilst the perl5-porters ensure that no change to the Perl internals
-| can break the version of Storable distributed with it.
+| Perl core distribution, as of perl 5.8. 
+| Maintenance is now done by the perl5-porters.  We thank Raphael
+| Manfredi for providing us with this very useful module.
 +=======================================================================
 
 The Storable extension brings persistency to your data.
@@ -45,7 +46,13 @@ To compile this extension, run:
 
 There is an embeded POD manual page in Storable.pm.
 
-Raphael Manfredi <Raphael_Manfredi@pobox.com>
+Storable was written by Raphael Manfredi <Raphael_Manfredi@pobox.com>
+Maitainance is now done by the perl5-porters <perl5-porters@perl.org>
+
+Please e-mail us with problems, bug fixes, comments and complaints,
+although if you have complements you should send them to Raphael.
+Please don't e-mail Raphael with problems, as he no longer works on
+Storable, and your message will be delayed while he forwards it to us.
 
 ------------------------------------------------------------------------
 Thanks to (in chronological order):
@@ -68,3 +75,36 @@ There is a Japanese translation of this man page available at
 http://member.nifty.ne.jp/hippo2000/perltips/storable.htm,
 courtesy of Kawai, Takanori <kawai@nippon-rad.co.jp>.
 ------------------------------------------------------------------------
+
+The perl5-porters would like to thank
+
+    Raphael Manfredi <Raphael_Manfredi@pobox.com>
+
+According to the perl5.8 Changes file the following people have helped
+bring you this Storable release:
+
+    Abhijit Menon-Sen <ams@wiw.org>
+    Andreas J. Koenig <andreas.koenig@anima.de>
+    Archer Sully <archer@meer.net>
+    Craig A. Berry <craig.berry@psinetcs.com>
+    Dan Kogai <dankogai@dan.co.jp>
+    Doug MacEachern <dougm@covalent.net>
+    Gurusamy Sarathy <gsar@ActiveState.com>
+    H.Merijn Brand <h.m.brand@hccnet.nl>
+    Jarkko Hietaniemi <jhi@iki.fi>
+    Mark Bixby
+    Michael Stevens <michael@etla.org>
+    Mike Guy <mjtg@cam.ac.uk>
+    Nicholas Clark <nick@unfortu.net>
+    Peter J. Farley III <pjfarley@banet.net>
+    Peter Prymmer <pvhp@forte.com>
+    Philip Newton <Philip.Newton@gmx.net>
+    Raphael Manfredi <Raphael_Manfredi@pobox.com>
+    Robin Barker <rmb1@cise.npl.co.uk>
+    Radu Greab <radu@netsoft.ro>
+    Tim Bunce <Tim.Bunce@pobox.com>
+    VMSperlers
+    Yitzchak Scott-Thoennes <sthoenna@efn.org>
+
+If I've missed you out, please accept my apologies, and e-mail your
+patch to perl5-porters@perl.org.

diff --git a/ext/Storable/Storable.pm b/ext/Storable/Storable.pm
index e6d5269..3031a8d 100644 (file)
--- a/ext/Storable/Storable.pm
+++ b/ext/Storable/Storable.pm
@@ -891,10 +891,6 @@ C<Storable::drop_utf8> is a blunt tool.  There is no facility either to
 return B<all> strings as utf8 sequences, or to attempt to convert utf8
 data back to 8 bit and C<croak()> if the conversion fails.
 
-Future compatibility does not yet extend to having the option of loading
-serialized data with higher than current minor version numbers.  This
-ought to be fixed pronto.
-
 =head1 CREDITS
 
 Thank you to (in chronological order):
@@ -933,7 +929,13 @@ courtesy of Kawai, Takanori <kawai@nippon-rad.co.jp>.
 
 =head1 AUTHOR
 
-Raphael Manfredi F<E<lt>Raphael_Manfredi@pobox.comE<gt>>
+Storable was written by Raphael Manfredi F<E<lt>Raphael_Manfredi@pobox.comE<gt>>
+Maitainance is now done by the perl5-porters F<E<lt>perl5-porters@perl.orgE<gt>>
+
+Please e-mail us with problems, bug fixes, comments and complaints,
+although if you have complements you should send them to Raphael.
+Please don't e-mail Raphael with problems, as he no longer works on
+Storable, and your message will be delayed while he forwards it to us.
 
 =head1 SEE ALSO
 

diff --git a/ext/Storable/t/malice.t b/ext/Storable/t/malice.t
index c8edc45..3881afb 100644 (file)
--- a/ext/Storable/t/malice.t
+++ b/ext/Storable/t/malice.t
@@ -245,7 +245,7 @@ sub test_things {
   # local $Storable::DEBUGME = 1;
   # This is the delayed croak
   test_corrupt ($copy, $sub,
-                "/^Storable binary image v$header->{major}.$minor4 contains data of type 255. This Storable is v$header->{major}.$header->{minor} and can only handle data types up to 25/",
+                "/^Storable binary image v$header->{major}.$minor4 contains data of type 255. This Storable is v$header->{major}.$minor and can only handle data types up to 25/",
                 "bogus tag, minor plus 4");
   # And check again that this croak is not delayed:
   {