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=90eba7e6ac08a4158c7b54405aa2f760ba238300;hp=a29ff8ae7cb96254c2a1cae5a0b4c5724075aa8c;hb=9d2a4940f5958d82828272364ef754e9290b6113;hpb=1716b20061af51ca82cc543f618f19c1e20f2efa diff --git a/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm b/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm index a29ff8a..90eba7e 100644 --- a/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm +++ b/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm @@ -1,7 +1,12 @@ use strict; use warnings; package Devel::REPL::Plugin::CompletionDriver::INC; +# ABSTRACT: Complete module names in use and require + +our $VERSION = '1.003027'; + use Devel::REPL::Plugin; +use Devel::REPL::Plugin::Completion; # die early if cannot load use File::Next; use File::Spec; use namespace::autoclean; @@ -65,7 +70,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 = ( @@ -101,7 +106,7 @@ around complete => sub { } }; - # look through all of + # look through all of INC: for (@INC) { my $path = $_; @@ -124,13 +129,10 @@ around complete => sub { __END__ -=head1 NAME - -Devel::REPL::Plugin::CompletionDriver::INC - Complete module names in use and require +=pod =head1 AUTHOR Shawn M Moore, C<< >> =cut -