We need to take a copy of the version as a string in order to pass
Dave Rolsky [Mon, 25 Aug 2008 04:55:22 +0000 (04:55 +0000)]
that to the XSLoader, or else it complains with something like
'0.64_04 doesn't match 0.6404'

lib/Class/MOP.pm

index c124ad9..a646e00 100644 (file)
@@ -49,6 +49,7 @@ BEGIN {
 }
 
 our $VERSION   = '0.64_04';
+our $XS_VERSION = $VERSION;
 $VERSION = eval $VERSION;
 our $AUTHORITY = 'cpan:STEVAN';    
     
@@ -59,7 +60,7 @@ unless ($ENV{CLASS_MOP_NO_XS}) {
         local $@;
         eval {
             require XSLoader;
-            __PACKAGE__->XSLoader::load($VERSION);
+            __PACKAGE__->XSLoader::load($XS_VERSION);
         };
         $@;
     };