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;fp=lib%2FDevel%2FREPL%2FPlugin%2FCompletionDriver%2FINC.pm;h=0daf803ab5ec3adf0f270b90219802eb8fa66a70;hp=2409a706d504852c6447a693d02454b64e75a5c1;hb=ce00c3c0a40bb8b788d36d85bdbba43d05523b9a;hpb=ab213f1fb1871c2b753fcea321938e8815a04c39 diff --git a/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm b/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm index 2409a70..0daf803 100644 --- a/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm +++ b/lib/Devel/REPL/Plugin/CompletionDriver/INC.pm @@ -76,7 +76,7 @@ around complete => sub { 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 = $_;