X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDevel%2FREPL%2FPlugin%2FTurtles.pm;h=a8fd9df30e74ab8ed6eb6d7b48a2582c4c2e441c;hb=9b7bfb6ac233dca407f12db47aa8dda7c9c1d338;hp=0ae8299ae51d93d163661b1b268ee4d6579e9b12;hpb=79e70b9ce0a3066a8ad8950e9cb32f6198afd592;p=p5sagit%2FDevel-REPL.git diff --git a/lib/Devel/REPL/Plugin/Turtles.pm b/lib/Devel/REPL/Plugin/Turtles.pm index 0ae8299..a8fd9df 100644 --- a/lib/Devel/REPL/Plugin/Turtles.pm +++ b/lib/Devel/REPL/Plugin/Turtles.pm @@ -3,9 +3,7 @@ use Devel::REPL::Plugin; use Scalar::Util qw(reftype); -use MooseX::AttributeHelpers; - -use namespace::clean -except => [ 'meta' ]; +use namespace::autoclean; has default_command_prefix => ( isa => "RegexpRef", @@ -19,8 +17,8 @@ has turtles_matchers => ( is => "rw", lazy => 1, default => sub { my $prefix = shift->default_command_prefix; [qr/^ $prefix (\w+) \s* (.*) /x] }, - provides => { - unshift => "add_turtles_matcher", + handles => { + add_turtles_matcher => 'unshift', }, );