fix warning on earlier perls
Jesse Luehrs [Mon, 27 Sep 2010 15:05:44 +0000 (10:05 -0500)]
lib/Class/MOP/Method/Meta.pm

index a22ac55..7366c82 100644 (file)
@@ -11,7 +11,7 @@ our $VERSION   = '1.08';
 $VERSION = eval $VERSION;
 our $AUTHORITY = 'cpan:STEVAN';
 
-use constant DEBUG_NO_META => $ENV{DEBUG_NO_META};
+use constant DEBUG_NO_META => $ENV{DEBUG_NO_META} ? 1 : 0;
 
 use base 'Class::MOP::Method';