From: oliver <oliver@bd8105ee-0ff8-0310-8827-fb3f25b6796d>
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?a=commitdiff_plain;h=32d646c7c20ff26e8b0ae31b329fafb7094f6db7;p=p5sagit%2FDevel-REPL.git

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 {