+use strict;
+use warnings;
package Devel::REPL::Plugin::CompletionDriver::INC;
use Devel::REPL::Plugin;
use File::Next;
use File::Spec;
-use namespace::clean -except => [ 'meta' ];
+use namespace::autoclean;
sub BEFORE_PLUGIN {
my $self = shift;
my $add_recursively;
$add_recursively = sub {
my ($path, $iteration, @more) = @_;
- opendir((my $dirhandle), $path);
+ opendir((my $dirhandle), $path) || return;
for (grep { !$ignored{$_} } readdir $dirhandle)
{
my $match = $_;
}
};
- # look through all of
+ # look through all of
INC: for (@INC)
{
my $path = $_;