summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog4
-rw-r--r--Completion/Builtins/_zmodload59
2 files changed, 46 insertions, 17 deletions
diff --git a/ChangeLog b/ChangeLog
index f72c22080..cca4e60ce 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2000-08-18 Oliver Kiddle <opk@zsh.org>
+
+ * 12677: Completion/Builtins/_zmodload: use _arguments in _zmodload
+
2000-08-16 Peter Stephenson <pws@csr.com>
* unposted: Src/.distfiles: forgot this yet again.
diff --git a/Completion/Builtins/_zmodload b/Completion/Builtins/_zmodload
index fd476ca99..1d8cb1e05 100644
--- a/Completion/Builtins/_zmodload
+++ b/Completion/Builtins/_zmodload
@@ -1,21 +1,46 @@
#compdef zmodload
-local fl="$words[2]" expl ret=1
+local suf comp state line expl curcontext="$curcontext" ret=1
+typeset -A opt_args
+suf=()
-if [[ "$fl" = -*(a*u|u*a)* || "$fl" = -*a* && CURRENT -ge 4 ]]; then
- _wanted builtins expl 'builtin command' compadd "$@" -k builtins
-elif [[ "$fl" = -*u* ]]; then
- _wanted modules expl module compadd -k modules
-else
- _tags files aliases
- while _tags; do
- _requested files expl 'module file' \
- _files -W module_path -/g '*.(dll|s[ol])(:r)' && ret=0
- if _requested aliases expl 'module alias'; then
- local array
- array=(${${(f)"$(zmodload -A)"}%% *})
- (( $#array )) && compadd "${expl[@]}" -- $array && ret=0
- fi
- (( ret )) || break
- done
+_arguments -C -A "-*" -s \
+ '(-d -e)-i[suppress error if command would do nothing]' \
+ '-u[unload module]' \
+ '(-i)-d[list or specify module dependencies]' \
+ '(-e)-a[autoload module]' \
+ '(-c -I -p -f)-b[autoload module for builtins]' \
+ '(-b -I -p -f)-c[autoload module for condition codes]' \
+ '(-b -c -p -f)-I[define infix condition names]' \
+ '(-b -c -I -f)-p[autoload module for parameters]' \
+ '(-b -c -I -p)-f[autoload module for math functions]' \
+ '(-i -u -d -a -b -c -p -f -L -A)-e[test if modules are loaded]' \
+ '(-e -u)-L[output in the form of calls to zmodload]' \
+ '(-i -u -d -a -b -c -I -p -f -e)-A[create module aliases]' \
+ '*:params:->params' && ret=0
+
+[[ $state = params ]] || return ret
+
+(( $+opt_args[-A] )) && compset -P '*=' || suf=( -S '=' )
+
+comp=( files aliases )
+if (( $+opt_args[-u] )); then
+ if (( $+opt_args[-b] || $+opt_args[-a] )); then
+ comp=( builtins )
+ else
+ comp=( loadedmodules aliases )
+ fi
fi
+(( $+opt_args[-a] && CURRENT > 3 )) && comp=( builtins )
+
+_tags "$comp[@]"
+while _tags; do
+ _requested builtins expl 'builtin command' \
+ compadd "$@" -k builtins && ret=0
+ _requested loadedmodules expl 'loaded modules' \
+ compadd -k 'modules[(R)loaded]' && ret=0
+ _requested files expl 'module file' \
+ _files -W module_path -/g '*.(dll|s[ol])(:r)' && ret=0
+ _requested aliases expl 'module alias' \
+ compadd "$suf[@]" -k 'modules[(R)alias*]' && ret=0
+done