This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Switch Storable to XSLoader from DynaLoader
authorDavid Leadbeater <dgl@dgl.cx>
Tue, 8 Mar 2011 21:41:51 +0000 (21:41 +0000)
committerFather Chrysostomos <sprout@cpan.org>
Sat, 12 Mar 2011 20:43:46 +0000 (12:43 -0800)
dist/Storable/Storable.pm

index 6954613..fcc1588 100644 (file)
@@ -5,9 +5,9 @@
 #  in the README file that comes with the distribution.
 #
 
-require DynaLoader;
+require XSLoader;
 require Exporter;
-package Storable; @ISA = qw(Exporter DynaLoader);
+package Storable; @ISA = qw(Exporter);
 
 @EXPORT = qw(store retrieve);
 @EXPORT_OK = qw(
@@ -23,7 +23,7 @@ use AutoLoader;
 use FileHandle;
 use vars qw($canonical $forgive_me $VERSION);
 
-$VERSION = '2.26';
+$VERSION = '2.27';
 *AUTOLOAD = \&AutoLoader::AUTOLOAD;            # Grrr...
 
 #
@@ -64,7 +64,8 @@ sub retrieve_fd { &fd_retrieve }              # Backward compatibility
 
 $Storable::downgrade_restricted = 1;
 $Storable::accept_future_minor = 1;
-bootstrap Storable;
+
+XSLoader::load 'Storable', $Storable::VERSION;
 1;
 __END__
 #