Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
_all_labels	920 B	-rw-r--r--
_all_matches	970 B	-rw-r--r--
_alternative	1.93 KB	-rw-r--r--
_approximate	3.39 KB	-rw-r--r--
_arg_compile	7.39 KB	-rw-r--r--
_arguments	17.09 KB	-rw-r--r--
_bash_completions	1.33 KB	-rw-r--r--
_cache_invalid	707 B	-rw-r--r--
_call_function	737 B	-rw-r--r--
_call_program	853 B	-rw-r--r--
_combination	2.44 KB	-rw-r--r--
_comp_locale	572 B	-rw-r--r--
_complete	3.09 KB	-rw-r--r--
_complete_debug	1 KB	-rw-r--r--
_complete_help	2.59 KB	-rw-r--r--
_complete_help_generic	412 B	-rw-r--r--
_complete_tag	1.98 KB	-rw-r--r--
_correct	518 B	-rw-r--r--
_correct_filename	1.93 KB	-rw-r--r--
_correct_word	388 B	-rw-r--r--
_describe	3.62 KB	-rw-r--r--
_description	3.11 KB	-rw-r--r--
_dispatch	2.01 KB	-rw-r--r--
_expand	7.34 KB	-rw-r--r--
_expand_alias	2.02 KB	-rw-r--r--
_expand_word	307 B	-rw-r--r--
_extensions	1018 B	-rw-r--r--
_external_pwds	1.04 KB	-rw-r--r--
_generic	328 B	-rw-r--r--
_guard	177 B	-rw-r--r--
_history	1.44 KB	-rw-r--r--
_history_complete_word	3.37 KB	-rw-r--r--
_ignored	1.61 KB	-rw-r--r--
_list	822 B	-rw-r--r--
_main_complete	11.02 KB	-rw-r--r--
_match	2.37 KB	-rw-r--r--
_menu	558 B	-rw-r--r--
_message	840 B	-rw-r--r--
_most_recent_file	883 B	-rw-r--r--
_multi_parts	8.59 KB	-rw-r--r--
_next_label	600 B	-rw-r--r--
_next_tags	3.38 KB	-rw-r--r--
_normal	1.1 KB	-rw-r--r--
_nothing	90 B	-rw-r--r--
_oldlist	1.87 KB	-rw-r--r--
_pick_variant	1.15 KB	-rw-r--r--
_prefix	1.58 KB	-rw-r--r--
_read_comp	3.76 KB	-rw-r--r--
_regex_arguments	2.44 KB	-rw-r--r--
_regex_words	936 B	-rw-r--r--
_requested	268 B	-rw-r--r--
_retrieve_cache	732 B	-rw-r--r--
_sep_parts	3.72 KB	-rw-r--r--
_sequence	1.32 KB	-rw-r--r--
_set_command	815 B	-rw-r--r--
_setup	2.19 KB	-rw-r--r--
_store_cache	1.88 KB	-rw-r--r--
_sub_commands	136 B	-rw-r--r--
_tags	1.43 KB	-rw-r--r--
_user_expand	3.68 KB	-rw-r--r--
_values	3.73 KB	-rw-r--r--
_wanted	183 B	-rw-r--r--

Code Editor : _approximate

#autoload

# This code will try to correct the string on the line based on the
# strings generated for the context. These corrected strings will be
# shown in a list and one can cycle through them as in a menu completion
# or get the corrected prefix.

# We don't try correction if the string is too short or we have tried it
# already.

[[ _matcher_num -gt 1 || "${#:-$PREFIX$SUFFIX}" -le 1 ]] && return 1

local _comp_correct _correct_expl _correct_group comax cfgacc match
local oldcontext="${curcontext}" opm="$compstate[pattern_match]"
local dounfunction
integer ret=1

if [[ "$1" = -a* ]]; then
  cfgacc="${1[3,-1]}"
elif [[ "$1" = -a ]]; then
  cfgacc="$2"
else
  zstyle -s ":completion:${curcontext}:" max-errors cfgacc ||
      cfgacc='2 numeric'
fi

# Get the number of errors to accept.

if [[ "$cfgacc" = *numeric* && ${NUMERIC:-1} -ne 1 ]]; then
  # A numeric argument may mean that we should not try correction.

[[ "$cfgacc" = *not-numeric* ]] && return 1

# Prefer the numeric argument if that has a sensible value.

comax="${NUMERIC:-1}"
else
  comax="${cfgacc//[^0-9]}"
fi

# If the number of errors to accept is too small, give up.

[[ "$comax" -lt 1 ]] && return 1

_tags corrections original

# Otherwise temporarily define a function to use instead of
# the builtin that adds matches. This is used to be able
# to stick the `(#a...)' in the right place (after an
# ignored prefix).
#
# Current shell structure for use with "always", to make sure
# we unfunction the compadd.
{
if (( ! $+functions[compadd] )); then
  dounfunction=1
  compadd() {
    local ppre="$argv[(I)-p]"

[[ ${argv[(I)-[a-zA-Z]#U[a-zA-Z]#]} -eq 0 &&
       "${#:-$PREFIX$SUFFIX}" -le _comp_correct ]] && return

if [[ "$PREFIX" = \~* && ( ppre -eq 0 || "$argv[ppre+1]" != \~* ) ]]; then
      PREFIX="~(#a${_comp_correct})${PREFIX[2,-1]}"
    else
      PREFIX="(#a${_comp_correct})$PREFIX"
    fi

(( $_correct_group && ${${argv[1,(r)-(|-)]}[(I)-*[JV]]} )) &&
        _correct_expl[_correct_group]=${argv[1,(r)-(-|)][(R)-*[JV]]}

builtin compadd "$_correct_expl[@]" "$@"
  }
fi

_comp_correct=1

[[ -z "$compstate[pattern_match]" ]] && compstate[pattern_match]='*'

while [[ _comp_correct -le comax ]]; do
  curcontext="${oldcontext/(#b)([^:]#:[^:]#:)/${match[1][1,-2]}-${_comp_correct}:}"

_description corrections _correct_expl corrections \
               "e:$_comp_correct" "o:$PREFIX$SUFFIX"

_correct_group="$_correct_expl[(I)-*[JV]]"

if _complete; then
    if zstyle -t ":completion:${curcontext}:" insert-unambiguous &&
       [[ "${#compstate[unambiguous]}" -ge "${#:-$PREFIX$SUFFIX}" ]]; then
      compstate[pattern_insert]=unambiguous
    elif _requested original &&
         { [[ compstate[nmatches] -gt 1 ]] ||
           zstyle -t ":completion:${curcontext}:" original }; then
      local expl

_description -V original expl original

builtin compadd "$expl[@]" -U -Q - "$PREFIX$SUFFIX"

# If you always want to see the list of possible corrections,
      # set `compstate[list]=list force' here.

[[ "$compstate[list]" != list* ]] &&
          compstate[list]="$compstate[list] force"
    fi
    compstate[pattern_match]="$opm"

ret=0
    break
  fi

[[ "${#:-$PREFIX$SUFFIX}" -le _comp_correct+1 ]] && break
  (( _comp_correct++ ))
done

} always {
    [[ -n $dounfunction ]] && (( $+functions[compadd] )) && unfunction compadd
}

(( ret == 0 )) && return 0

compstate[pattern_match]="$opm"

return 1

${this.title}

Code Editor : _approximate