Allow Data::Dumper to load on miniperl
authorFather Chrysostomos <sprout@cpan.org>
Sat, 31 Dec 2011 18:53:10 +0000 (10:53 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Sat, 31 Dec 2011 19:37:05 +0000 (11:37 -0800)
For a long time it has been doing eval { require XSLoader }, but
XSLoader will load on miniperl, it’s just XSLoader::load() that fails.

dist/Data-Dumper/Dumper.pm

index 78e96a9..b2f3fc6 100644 (file)
@@ -31,9 +31,10 @@ BEGIN {
     # toggled on load failure.
     eval {
        require XSLoader;
+       XSLoader::load( 'Data::Dumper' );
+       1
     }
-    ? XSLoader::load( 'Data::Dumper' )
-    : ($Useperl = 1);
+    or $Useperl = 1;
 }
 
 # module vars and their defaults