1
0
mirror of git://git.code.sf.net/p/zsh/code synced 2024-11-19 13:33:52 +01:00
zsh/Completion/Base/Completer/_history
2001-04-02 11:07:11 +00:00

61 lines
1.3 KiB
Plaintext

#autoload
# Hm, this *can* sensibly be used as a completer. But it could also be used
# as a utility function, so maybe it should be moved into another directory.
# Or maybe not. Hm.
#
#
# Complete words from the history
#
# Code taken from _history_complete_words.
#
# Available styles:
#
# sort -- sort matches lexically (default is to sort by age)
# remove-all-dups --
# remove /all/ duplicate matches rather than just consecutives
# range -- range of history words to complete
local opt expl max slice hmax=$#historywords beg=2
if zstyle -t ":completion:${curcontext}:" remove-all-dups; then
opt=-
else
opt=-1
fi
if zstyle -t ":completion:${curcontext}:" sort; then
opt="${opt}J"
else
opt="${opt}V"
fi
if zstyle -s ":completion:${curcontext}:" range max; then
if [[ $max = *:* ]]; then
slice=${max#*:}
max=${max%:*}
else
slice=$max
fi
[[ max -gt hmax ]] && max=$hmax
else
max=$hmax
slice=$max
fi
PREFIX="$IPREFIX$PREFIX"
IPREFIX=
SUFFIX="$SUFFIX$ISUFFIX"
ISUFFIX=
# We skip the first element of historywords so the current word doesn't
# interfere with the completion
while [[ $compstate[nmatches] -eq 0 && beg -lt max ]]; do
_wanted "$opt" history-words expl 'history word' \
compadd -Q -a 'historywords[beg,beg+slice]'
(( beg+=slice ))
done
(( $compstate[nmatches] ))