X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FDevel-REPL.git;a=blobdiff_plain;f=lib%2FDevel%2FREPL%2FPlugin%2FLexEnv.pm;h=8d9d370da9925e1f4b0b0e4cd8c1eff14d65fa18;hp=e9a297f5903350e670bdc6e36020a40adb466c42;hb=moo;hpb=9b7bfb6ac233dca407f12db47aa8dda7c9c1d338 diff --git a/lib/Devel/REPL/Plugin/LexEnv.pm b/lib/Devel/REPL/Plugin/LexEnv.pm index e9a297f..8d9d370 100644 --- a/lib/Devel/REPL/Plugin/LexEnv.pm +++ b/lib/Devel/REPL/Plugin/LexEnv.pm @@ -1,8 +1,9 @@ package Devel::REPL::Plugin::LexEnv; use Devel::REPL::Plugin; -use namespace::autoclean; +use namespace::sweep; use Lexical::Persistence; +use MooX::Types::MooseLike::Base qw(InstanceOf ArrayRef); sub BEFORE_PLUGIN { my $self = shift; @@ -10,7 +11,7 @@ sub BEFORE_PLUGIN { } has 'lexical_environment' => ( - isa => 'Lexical::Persistence', + isa => InstanceOf('Lexical::Persistence'), is => 'rw', required => 1, lazy => 1, @@ -18,7 +19,7 @@ has 'lexical_environment' => ( ); has '_hints' => ( - isa => "ArrayRef", + isa => ArrayRef, is => "rw", predicate => '_has_hints', );