mirror of
git://git.code.sf.net/p/zsh/code
synced 2025-10-13 23:31:08 +02:00
21 lines
617 B
Text
21 lines
617 B
Text
#autoload
|
|
|
|
# This is mainly a wrapper around the more general `_approximate'.
|
|
# By setting `compstate[pattern_match]' to something unequal to `*' and
|
|
# then calling `_approximate', we get only corrections, not all strings
|
|
# with the corrected prefix and something after it.
|
|
#
|
|
# Supported configuration keys are the same as for `_approximate', only
|
|
# starting with `correct'.
|
|
|
|
local ret=1 opm="$compstate[pattern_match]" curcontext="${curcontext}"
|
|
|
|
[[ "$curcontext" != :correct* ]] && curcontext="${curcontext}:correct"
|
|
|
|
compstate[pattern_match]='-'
|
|
|
|
_approximate && ret=0
|
|
|
|
compstate[pattern_match]="$opm"
|
|
|
|
return ret
|