From: gfx Date: Mon, 11 Jan 2010 07:13:48 +0000 (+0900) Subject: require Class::Method::Modifiers::Fast 0.041; this is because it requries gfx's Data... X-Git-Tag: 0.47~6 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d0773d24434581f9ef0603d47dd2bc325097cc1b;p=gitmo%2FMouse.git require Class::Method::Modifiers::Fast 0.041; this is because it requries gfx's Data::Util correctly. --- diff --git a/lib/Mouse/Meta/Class.pm b/lib/Mouse/Meta/Class.pm index 520cc9d..5d1755b 100644 --- a/lib/Mouse/Meta/Class.pm +++ b/lib/Mouse/Meta/Class.pm @@ -345,7 +345,7 @@ sub _install_modifier { # load Class::Method::Modifiers first my $no_cmm_fast = do{ local $@; - eval q{ require Class::Method::Modifiers::Fast }; + eval q{ use Class::Method::Modifiers::Fast 0.041 () }; $@; }; @@ -354,7 +354,7 @@ sub _install_modifier { $impl = \&_install_modifier_pp; } else{ - my $install_modifier = Class::Method::Modifiers::Fast->can('_install_modifier'); + my $install_modifier = Class::Method::Modifiers::Fast->can('install_modifier'); $impl = sub { my ( $self, $type, $name, $code ) = @_; my $into = $self->name;