[Bast-commits] r5876 - trunk/Devel-REPL/lib/Devel/REPL/Plugin

[oliver at dev.catalyst.perl.org]

Author: oliver
Date: 2009-04-09 22:33:40 +0100 (Thu, 09 Apr 2009)
New Revision: 5876

Modified:
   trunk/Devel-REPL/lib/Devel/REPL/Plugin/Commands.pm
Log:
resolve rt.cpan#43808 infinite recursion on Plugin::Commands when Plugin::Packages not loaded

Modified: trunk/Devel-REPL/lib/Devel/REPL/Plugin/Commands.pm
===================================================================
--- trunk/Devel-REPL/lib/Devel/REPL/Plugin/Commands.pm	2009-04-09 21:26:24 UTC (rev 5875)
+++ trunk/Devel-REPL/lib/Devel/REPL/Plugin/Commands.pm	2009-04-09 21:33:40 UTC (rev 5876)
@@ -13,6 +13,7 @@
 
 sub BEFORE_PLUGIN {
   my ($self) = @_;
+  $self->load_plugin('Packages');
   unless ($self->can('setup_commands')) {
     $self->meta->add_method('setup_commands' => sub {});
   }