mirror of
git://git.code.sf.net/p/zsh/code
synced 2024-11-20 05:53:52 +01:00
37 lines
945 B
Plaintext
37 lines
945 B
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:
|
|
#
|
|
# :history-words:sort -- sort matches lexically (default is to sort by age)
|
|
# :history-words:remove-all-dups --
|
|
# remove /all/ duplicate matches rather than just
|
|
# consecutives
|
|
|
|
local opt expl h_words
|
|
|
|
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
|
|
|
|
# We skip the first element of historywords so the current word doesn't
|
|
# interfere with the completion
|
|
h_words=( "${(@)historywords[2,-1]}" )
|
|
_wanted "$opt" history-words expl 'history word' compadd -Q -a h_words
|