diff options
author | Sven Wischnowsky <wischnow@users.sourceforge.net> | 2000-10-06 13:01:51 +0000 |
---|---|---|
committer | Sven Wischnowsky <wischnow@users.sourceforge.net> | 2000-10-06 13:01:51 +0000 |
commit | cb4bb129dd143255a582ddd203baa73d3dcc1db7 (patch) | |
tree | 9edc79a76c65821dfabccdb6a13f7c6e6adbc7e9 /Completion/User/_perl_modules | |
parent | 2f2a33b2ea949a15d0e50678a495803bf8c07ef4 (diff) | |
download | zsh-cb4bb129dd143255a582ddd203baa73d3dcc1db7.tar.gz zsh-cb4bb129dd143255a582ddd203baa73d3dcc1db7.tar.xz zsh-cb4bb129dd143255a582ddd203baa73d3dcc1db7.zip |
more option setting cleanup; remove some unnecessary setopts, remove N qualifiers (12917)
Diffstat (limited to 'Completion/User/_perl_modules')
-rw-r--r-- | Completion/User/_perl_modules | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/Completion/User/_perl_modules b/Completion/User/_perl_modules index 117933022..84273f7fa 100644 --- a/Completion/User/_perl_modules +++ b/Completion/User/_perl_modules @@ -46,7 +46,6 @@ _perl_modules () { # complete Perl modules. Maybe her $path is wrong? _message "Didn't find perl on \$PATH; guessing @INC ..." - setopt localoptions extendedglob inc=( /usr/lib/perl5{,/{site_perl/,}<5->.([0-9]##)}(N) ${(s.:.)PERL5LIB} ) fi @@ -61,7 +60,7 @@ _perl_modules () { # Find all modules if [[ -d $libdir && -x $libdir ]]; then cd $libdir - new_pms=( {[A-Z]*/***/,}*.pm~*blib*(N) ) + new_pms=( {[A-Z]*/***/,}*.pm~*blib* ) cd $OLDPWD fi @@ -84,10 +83,10 @@ _perl_modules_caching_policy () { local _perllocals # rebuild if cache is more than a week old - oldp=( "$1"(Nmw+1) ) + oldp=( "$1"(mw+1) ) (( $#oldp )) && return 0 - _perllocals=( /usr/lib/perl5/**/perllocal.pod(N) ) + _perllocals=( /usr/lib/perl5/**/perllocal.pod ) if (( $#_perllocals )); then for pod in $_perllocals; do |