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=bf4e6c3637b00b0260ddae6f54ee8009f9ef9dc7;hp=0daf803ab5ec3adf0f270b90219802eb8fa66a70;hb=6f4f9516b3422a8ce51b89b596fb808b197f833e;hpb=ce00c3c0a40bb8b788d36d85bdbba43d05523b9a diff --git a/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm b/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm index 0daf803..bf4e6c3 100644 --- a/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm +++ b/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm @@ -1,8 +1,12 @@ +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 +67,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 +103,7 @@ around complete => sub { } }; - # look through all of + # look through all of INC: for (@INC) { my $path = $_;