about summary refs log tree commit diff
path: root/Completion/User
diff options
context:
space:
mode:
Diffstat (limited to 'Completion/User')
-rw-r--r--Completion/User/_perl_modules2
1 files changed, 2 insertions, 0 deletions
diff --git a/Completion/User/_perl_modules b/Completion/User/_perl_modules
index d63f94f1b..f28fc3ecc 100644
--- a/Completion/User/_perl_modules
+++ b/Completion/User/_perl_modules
@@ -46,9 +46,11 @@ if [[ ${+_perl_modules} -eq 0 ]]; then
       if [[ $libdir == '.' ]]; then break; fi
 
       # Find all modules
+      if [[ -d $libdir && -x $libdir ]]; then
       cd $libdir
       new_pms=( {[A-Z]*/***/,}*.pm~*blib*(N) )
       cd $OLDPWD
+      fi
 
       # Convert to Perl nomenclature
       new_pms=( ${new_pms:r:fs#/#::#} )