X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FDevel-REPL.git;a=blobdiff_plain;f=lib%2FDevel%2FREPL%2FPlugin%2FCompletionDriver%2FINC.pm;h=8478d1b88ca152c115b6a32d5bac8d0cc15fd2d0;hp=0daf803ab5ec3adf0f270b90219802eb8fa66a70;hb=0e0d2539048eade7dfa30fff6f1ad5b7e90bbf70;hpb=ce00c3c0a40bb8b788d36d85bdbba43d05523b9a diff --git a/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm b/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm index 0daf803..8478d1b 100644 --- a/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm +++ b/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm @@ -1,8 +1,11 @@ +use strict; +use warnings; package Devel::REPL::Plugin::CompletionDriver::INC; use Devel::REPL::Plugin; +use Devel::REPL::Plugin::Completion; # die early if cannot load use File::Next; use File::Spec; -use namespace::clean -except => [ 'meta' ]; +use namespace::autoclean; sub BEFORE_PLUGIN { my $self = shift; @@ -63,7 +66,7 @@ around complete => sub { my @found; # most VCSes don't litter every single fucking directory with garbage. if you - # know of any other, just stick them in here. noone wants to complete + # know of any other, just stick them in here. No one wants to complete # Devel::REPL::Plugin::.svn my %ignored = ( @@ -99,7 +102,7 @@ around complete => sub { } }; - # look through all of + # look through all of INC: for (@INC) { my $path = $_;