diff options
Diffstat (limited to 'Completion/User')
-rw-r--r-- | Completion/User/_gcc | 2 | ||||
-rw-r--r-- | Completion/User/_gdb | 4 | ||||
-rw-r--r-- | Completion/User/_mailboxes | 10 | ||||
-rw-r--r-- | Completion/User/_man | 8 | ||||
-rw-r--r-- | Completion/User/_perl_modules | 7 | ||||
-rw-r--r-- | Completion/User/_printers | 2 | ||||
-rw-r--r-- | Completion/User/_zdump | 2 |
7 files changed, 15 insertions, 20 deletions
diff --git a/Completion/User/_gcc b/Completion/User/_gcc index 92fff6a3d..f826f9793 100644 --- a/Completion/User/_gcc +++ b/Completion/User/_gcc @@ -274,7 +274,7 @@ dump) ;; library) _wanted libraries expl library \ - compadd - ${^=LD_LIBRARY_PATH:-/usr/lib /usr/local/lib}/lib*.(a|so*)(N:t:fr:s/lib//) && ret=0 + compadd - ${^=LD_LIBRARY_PATH:-/usr/lib /usr/local/lib}/lib*.(a|so*)(:t:fr:s/lib//) && ret=0 ;; esac diff --git a/Completion/User/_gdb b/Completion/User/_gdb index e1cca537f..f7dbb0a10 100644 --- a/Completion/User/_gdb +++ b/Completion/User/_gdb @@ -5,12 +5,12 @@ local cur="$words[CURRENT]" prev w list ret=1 expl [[ "$PREFIX" = --* ]] && _arguments -- '*=(CORE|SYM)FILE:core file:_files' \ '*=EXECFILE:executable:_files -g \*\(-\*\)' \ - '*=TTY:terminal device:compadd /dev/tty\*\(N\)' && return 0 + '*=TTY:terminal device:compadd /dev/tty\*' && return 0 if compset -P '-(cd|directory)='; then _files -/ elif compset -P '-tty='; then - _wanted devices expl 'terminal device' compadd - /dev/tty*(N) + _wanted devices expl 'terminal device' compadd - /dev/tty* elif compset -P '-(exec|se)='; then _description files expl executable _files "$expl[@]" -g '*(-*)' diff --git a/Completion/User/_mailboxes b/Completion/User/_mailboxes index 1f44ba7af..356b377ec 100644 --- a/Completion/User/_mailboxes +++ b/Completion/User/_mailboxes @@ -67,17 +67,15 @@ _mailbox_cache () { typeset -aU -g _mailbox_cache typeset -aU -g _maildir_cache _mbox_cache _mh_cache _mutt_cache _pine_cache - setopt localoptions nullglob - [[ -f ${~muttrc:-.} ]] && _mutt_cache=( ${=${(M)${(f)"$(<${~muttrc})"}:#mailboxes *}#mailboxes *} ) - _mbox_cache=( ${~maildirectory}/*(N^/) ) - _pine_cache=( ${~pinedirectory}/**/*(N.) ) + _mbox_cache=( ${~maildirectory}/*(^/) ) + _pine_cache=( ${~pinedirectory}/**/*(.) ) - dirboxes=( ${~maildirectory}/*(N/) ) + dirboxes=( ${~maildirectory}/*(/) ) while (( $#dirboxes )); do i=${dirboxes[1]} @@ -87,7 +85,7 @@ _mailbox_cache () { elif j=( "$i"/<1-> ) && [[ -n "$j" ]]; then _mh_cache=( "${_mh_cache[@]}" "$i" ) else - _mbox_cache=( "${_mbox_cache[@]}" "$i"/*(N.) ) + _mbox_cache=( "${_mbox_cache[@]}" "$i"/*(.) ) dirboxes=( $dirboxes "$i"/*(/) ) fi done diff --git a/Completion/User/_man b/Completion/User/_man index d96793e9c..8f255c411 100644 --- a/Completion/User/_man +++ b/Completion/User/_man @@ -1,7 +1,5 @@ #compdef man apropos whatis -setopt localoptions rcexpandparam - local rep expl star approx mrd if [[ $words[1] == man ]] && (( $words[(I)-l] + $words[(I)--local-file] )); then @@ -26,7 +24,7 @@ if (( ! $#manpath )); then fi (( $#manpath )) || manpath=( ${(s.:.)$(manpath 2>/dev/null)} ) || - manpath=( /usr/man(-/N) /(opt|usr)/(dt|share|X11R6|local)/(cat|)man(-/N) ) + manpath=( /usr/man(-/) /(opt|usr)/(dt|share|X11R6|local)/(cat|)man(-/) ) # `sman' is the SGML manual directory for Solaris 7. # 1M is system administrator commands on SVR4 @@ -34,10 +32,10 @@ fi mrd=(${^manpath/\%L/${LANG:-En_US.ASCII}}/mandb(N)) if [[ $words[2] = (<->*|1M|l|n) ]]; then rep=( - $manpath/(sman|man|cat)${words[2]}/${~approx}$PREFIX${~star}$SUFFIX.*(N:t) ) + $manpath/(sman|man|cat)${words[2]}/${~approx}$PREFIX${~star}$SUFFIX.*(:t) ) (($#mrd)) && rep[$#rep+1]=($(awk "\$2 == \"$words[2]\" {print \$1}" $mrd)) else - rep=( $manpath/(sman|man|cat)*/${~approx}$PREFIX${~star}$SUFFIX.*(N:t) ) + rep=( $manpath/(sman|man|cat)*/${~approx}$PREFIX${~star}$SUFFIX.*(:t) ) (($#mrd)) && rep[$#rep+1]=($(awk '{print $1}' $mrd)) fi 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 diff --git a/Completion/User/_printers b/Completion/User/_printers index d98fa433a..1b42de5cb 100644 --- a/Completion/User/_printers +++ b/Completion/User/_printers @@ -11,7 +11,7 @@ fi if (( ! $+_lp_cache )); then local file entry names i - file=( /etc/(printcap|printers.conf)(N) ) + file=( /etc/(printcap|printers.conf) ) _lp_cache=() _lp_alias_cache=() diff --git a/Completion/User/_zdump b/Completion/User/_zdump index 598363ef5..3f17cc1ef 100644 --- a/Completion/User/_zdump +++ b/Completion/User/_zdump @@ -1,7 +1,7 @@ #compdef zdump if (( ! $+_zoneinfo_dirs )); then - _zoneinfo_dirs=( /usr/{share,lib,share/lib}/zoneinfo*(N/) ) + _zoneinfo_dirs=( /usr/{share,lib,share/lib}/zoneinfo*(/) ) fi _arguments '-v[lowest possible]' \ |