A tiny tweak
gfx [Mon, 21 Sep 2009 03:40:23 +0000 (12:40 +0900)]
lib/Mouse/Meta/Class.pm

index e2defbe..7d4cdcd 100644 (file)
@@ -228,9 +228,8 @@ sub _install_modifier {
 
     # replace this method itself :)
     {
-        no strict 'refs';
         no warnings 'redefine';
-        *{__PACKAGE__ . '::_install_modifier'} = sub {
+        *_install_modifier = sub {
             my ( $self, $into, $type, $name, $code ) = @_;
             $modifier->(
                 $into,