[Bast-commits] r3974 - trunk/Devel-REPL/lib/Devel/REPL

[matthewt at dev.catalyst.perl.org]

Author: matthewt
Date: 2008-01-25 07:43:58 +0000 (Fri, 25 Jan 2008)
New Revision: 3974

Modified:
   trunk/Devel-REPL/lib/Devel/REPL/Plugin.pm
Log:
use alias_method instead of trying to bolt in the MOP add_method

Modified: trunk/Devel-REPL/lib/Devel/REPL/Plugin.pm
===================================================================
--- trunk/Devel-REPL/lib/Devel/REPL/Plugin.pm	2008-01-25 00:59:57 UTC (rev 3973)
+++ trunk/Devel-REPL/lib/Devel/REPL/Plugin.pm	2008-01-25 07:43:58 UTC (rev 3974)
@@ -8,7 +8,7 @@
 sub import {
   my $target = caller;
   my $meta = Devel::REPL::Meta::Plugin->initialize($target);
-  $meta->Moose::Meta::Class::add_method('meta' => sub { $meta });
+  $meta->alias_method('meta' => sub { $meta });
   goto &Moose::Role::import;
 }