2000-04-30 12:04:29 +02:00
|
|
|
#compdef -k complete-word \C-x?
|
|
|
|
|
|
|
|
setopt localoptions nullglob rcexpandparam extendedglob
|
|
|
|
unsetopt markdirs globsubst shwordsplit nounset ksharrays
|
|
|
|
|
2000-05-19 18:04:16 +02:00
|
|
|
setopt localtraps noerrexit ; trap - ZERR
|
|
|
|
|
2000-04-30 12:04:29 +02:00
|
|
|
(( $+_debug_count )) || integer -g _debug_count
|
2000-05-02 13:56:27 +02:00
|
|
|
local tmp=${TMPPREFIX}${$}${words[1]:t}$[++_debug_count]
|
2000-05-12 04:31:05 +02:00
|
|
|
local w="${(qq)words}"
|
2000-04-30 12:04:29 +02:00
|
|
|
|
2000-05-12 04:31:05 +02:00
|
|
|
exec 3>&- # Too bad if somebody else is using it ...
|
2000-04-30 12:04:29 +02:00
|
|
|
[[ -t 2 ]] && exec 3>&2 2>| $tmp
|
|
|
|
|
|
|
|
setopt xtrace
|
|
|
|
_main_complete
|
|
|
|
integer ret=$?
|
|
|
|
unsetopt xtrace
|
|
|
|
|
2000-05-12 04:31:05 +02:00
|
|
|
[[ -t 3 ]] && {
|
2000-04-30 12:04:29 +02:00
|
|
|
## Calling "print -s" during completion is presently broken.
|
|
|
|
# _message -r "Trace output left in $tmp (up-history to view)"
|
|
|
|
# print -sR "${VISUAL:-${EDITOR:-${PAGER:-more}}} $tmp ;: $w"
|
|
|
|
_message -r "Trace output left in $tmp"
|
2000-05-25 09:58:44 +02:00
|
|
|
compstate[list]='list force'
|
2000-04-30 12:04:29 +02:00
|
|
|
print -zR "${VISUAL:-${EDITOR:-${PAGER:-more}}} $tmp ;: $w"
|
|
|
|
exec 2>&3 3>&-
|
|
|
|
}
|
|
|
|
|
|
|
|
return ret
|