zsh-workers
 help / color / mirror / code / Atom feed
* PATCH: _perl_modules caution
@ 2000-05-26 14:03 Clint Adams
  0 siblings, 0 replies; only message in thread
From: Clint Adams @ 2000-05-26 14:03 UTC (permalink / raw)
  To: zsh-workers

If @INC contains nonexistent directories, the cd below will fail,
which, in turn, leads to results that are ugly at best.

Index: Completion/User/_perl_modules
===================================================================
RCS file: /cvsroot/zsh/zsh/Completion/User/_perl_modules,v
retrieving revision 1.4
diff -u -r1.4 _perl_modules
--- Completion/User/_perl_modules	2000/05/23 18:06:32	1.4
+++ Completion/User/_perl_modules	2000/05/26 14:00:10
@@ -46,9 +46,11 @@
       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#/#::#} )


^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~2000-05-26 14:04 UTC | newest]

Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2000-05-26 14:03 PATCH: _perl_modules caution Clint Adams

Code repositories for project(s) associated with this public inbox

	https://git.vuxu.org/mirror/zsh/

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).