From: oliver Date: Sat, 30 May 2009 17:37:00 +0000 (+0000) Subject: resolve rt.cpan#44919 fix deprecated use of compute_all_applicable_methods X-Git-Tag: v1.003015~57 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FDevel-REPL.git;a=commitdiff_plain;h=32d646c7c20ff26e8b0ae31b329fafb7094f6db7;hp=79697f6184b05e3778e6090166d5bd9fcbd243b9 resolve rt.cpan#44919 fix deprecated use of compute_all_applicable_methods git-svn-id: http://dev.catalyst.perl.org/repos/bast/trunk/Devel-REPL@6468 bd8105ee-0ff8-0310-8827-fb3f25b6796d --- diff --git a/lib/Devel/REPL/Plugin/CompletionDriver/Methods.pm b/lib/Devel/REPL/Plugin/CompletionDriver/Methods.pm index 4044e1c..21c4e30 100644 --- a/lib/Devel/REPL/Plugin/CompletionDriver/Methods.pm +++ b/lib/Devel/REPL/Plugin/CompletionDriver/Methods.pm @@ -57,8 +57,8 @@ around complete => sub { return $orig->(@_), grep { $_ =~ $re } - map { $_->{name} } - $metaclass->compute_all_applicable_methods; + map { $_->name } + $metaclass->get_all_methods; }; 1; diff --git a/lib/Devel/REPL/Plugin/CompletionDriver/Turtles.pm b/lib/Devel/REPL/Plugin/CompletionDriver/Turtles.pm index 0ce6d77..bbb5a51 100644 --- a/lib/Devel/REPL/Plugin/CompletionDriver/Turtles.pm +++ b/lib/Devel/REPL/Plugin/CompletionDriver/Turtles.pm @@ -24,8 +24,8 @@ around complete => sub { map { "$pre$_" } grep { $_ =~ $filter } map { /^expr?_command_(\w+)/ ? $1 : () } - map { $_->{name} } - $self->meta->compute_all_applicable_methods + map { $_->name } + $self->meta->get_all_methods ), ); } else {