X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FClass%2FMOP.pm;h=a646e00efd58866963c18f9dab1b9760a289c450;hb=8a7085c1c895cd5a263fcf27224ea0999d65e704;hp=1204a2edd7a1006133476202164e820bcdb4ffcb;hpb=650e83227574b3c6ca6cfbcbaca643b913741bee;p=gitmo%2FClass-MOP.git diff --git a/lib/Class/MOP.pm b/lib/Class/MOP.pm index 1204a2e..a646e00 100644 --- a/lib/Class/MOP.pm +++ b/lib/Class/MOP.pm @@ -28,7 +28,7 @@ BEGIN { require Devel::GlobalDestruction; Devel::GlobalDestruction->import("in_global_destruction"); 1; - } or *in_global_destruction = sub () { '' }; + } or *in_global_destruction = sub () { !1 }; } @@ -48,7 +48,8 @@ BEGIN { : sub () { 1 }; } -our $VERSION = '0.64_02'; +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); }; $@; };