mirror of
git://git.code.sf.net/p/zsh/code
synced 2024-11-20 14:04:03 +01:00
93 lines
2.5 KiB
Plaintext
93 lines
2.5 KiB
Plaintext
|
#compdef -k complete-word \C-xh
|
||
|
|
||
|
_complete_help() {
|
||
|
setopt localoptions ${_comp_options[@]}
|
||
|
|
||
|
exec </dev/null # ZLE closes stdin, which can cause errors
|
||
|
|
||
|
local _sort_tags=_help_sort_tags text i j k tmp
|
||
|
typeset -A help_funcs help_tags help_sfuncs help_styles
|
||
|
|
||
|
compadd() { return 1 }
|
||
|
zstyle() {
|
||
|
local _f="${${(@)${(@)funcstack[2,(i)_(main_complete|complete|approximate|normal)]}:#_(wanted|requested|all_labels|next_label)}% *}"
|
||
|
|
||
|
[[ -z "$_f" ]] && _f="${${(@)funcstack[2,(i)_(main_complete|complete|approximate|normal)]}:#_(wanted|requested|all_labels|next_label)}"
|
||
|
|
||
|
if [[ "$help_sfuncs[$2]" != *${_f}* ||
|
||
|
"$help_styles[${2}${_f}]" != *${3}* ]]; then
|
||
|
[[ "$help_sfuncs[$2]" != *${_f}* ]] &&
|
||
|
help_sfuncs[$2]="${help_sfuncs[$2]}:${_f}"
|
||
|
local _t
|
||
|
|
||
|
case "$1" in
|
||
|
-s) _t='[string] ';;
|
||
|
-a) _t='[array] ';;
|
||
|
-h) _t='[assoc] ';;
|
||
|
*) _t='[boolean]';;
|
||
|
esac
|
||
|
help_styles[${2}${_f}]="${help_styles[${2}${_f}]},${_t} ${3}:${_f}"
|
||
|
fi
|
||
|
|
||
|
# No need to call the completers more than once with different match specs.
|
||
|
|
||
|
if [[ "$3" = matcher-list ]]; then
|
||
|
set -A "$4" ''
|
||
|
else
|
||
|
builtin zstyle "$@"
|
||
|
fi
|
||
|
}
|
||
|
|
||
|
_main_complete
|
||
|
|
||
|
unfunction compadd zstyle
|
||
|
|
||
|
for i in "${(@ok)help_funcs}"; do
|
||
|
text="${text}
|
||
|
tags in context :completion:${i}:"
|
||
|
tmp=()
|
||
|
for j in "${(@s.:.)help_funcs[$i][2,-1]}"; do
|
||
|
tmp=( "$tmp[@]" "${(@s.,.)help_tags[${i}${j}][2,-1]}" )
|
||
|
done
|
||
|
zformat -a tmp ' (' "$tmp[@]"
|
||
|
tmp=( '
|
||
|
'${^tmp}')' )
|
||
|
text="${text}${tmp}"
|
||
|
done
|
||
|
|
||
|
if [[ ${NUMERIC:-1} -ne 1 ]]; then
|
||
|
text="$text
|
||
|
"
|
||
|
for i in "${(@ok)help_sfuncs}"; do
|
||
|
text="${text}
|
||
|
styles in context ${i}"
|
||
|
tmp=()
|
||
|
for j in "${(@s.:.)help_sfuncs[$i][2,-1]}"; do
|
||
|
tmp=( "$tmp[@]" "${(@s.,.)help_styles[${i}${j}][2,-1]}" )
|
||
|
done
|
||
|
zformat -a tmp ' (' "$tmp[@]"
|
||
|
tmp=( '
|
||
|
'${^tmp}')' )
|
||
|
text="${text}${tmp}"
|
||
|
done
|
||
|
fi
|
||
|
compstate[list]='list force'
|
||
|
compstate[insert]=''
|
||
|
|
||
|
compadd -UX "$text[2,-1]" -n ''
|
||
|
}
|
||
|
|
||
|
_help_sort_tags() {
|
||
|
local f="${${(@)${(@)funcstack[3,(i)_(main_complete|complete|approximate|normal)]}:#_(wanted|requested|all_labels|next_label)}% *}"
|
||
|
|
||
|
if [[ "$help_funcs[$curcontext]" != *${f}* ||
|
||
|
"$help_tags[${curcontext}${f}]" != *(${(j:|:)~argv})* ]]; then
|
||
|
[[ "$help_funcs[$curcontext]" != *${f}* ]] &&
|
||
|
help_funcs[$curcontext]="${help_funcs[$curcontext]}:${f}"
|
||
|
help_tags[${curcontext}${f}]="${help_tags[${curcontext}${f}]},${argv}:${f}"
|
||
|
comptry "$@"
|
||
|
fi
|
||
|
}
|
||
|
|
||
|
_complete_help "$@"
|