Back out previous change. requires doesn't work for attributes. arg
Sartak [Mon, 26 May 2008 02:54:10 +0000 (02:54 +0000)]
git-svn-id: http://dev.catalyst.perl.org/repos/bast/trunk/Devel-REPL@4407 bd8105ee-0ff8-0310-8827-fb3f25b6796d

lib/Devel/REPL/Plugin/CompletionDriver/LexEnv.pm

index a91acca..f346bda 100644 (file)
@@ -2,7 +2,13 @@ package Devel::REPL::Plugin::CompletionDriver::LexEnv;
 use Devel::REPL::Plugin;
 use namespace::clean -except => [ 'meta' ];
 
-requires 'lexical_environment';
+sub AFTER_PLUGIN {
+  my ($_REPL) = @_;
+
+  if (!$_REPL->can('lexical_environment')) {
+    warn "Devel::REPL::Plugin::CompletionDriver::LexEnv requires Devel::REPL::Plugin::LexEnv.";
+  }
+}
 
 around complete => sub {
   my $orig = shift;