You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
|
#compdef scd #description smart change directory
local curcontext="$curcontext" state line expl ret=1 typeset -A opt_args
local -a indexopts myargs indexopts=( --add -a --unindex )
myargs=( # common options "(--help -h)"{--help,-h}"[print help and exit]"
# options for manipulating directory index - index "(--recursive -r)"{--recursive,-r}"[use recursive --add or --unindex]" "($indexopts)"{--add,-a}"[add specified directories to the index]" "($indexopts)--unindex[remove specified directories from the index]" "*:directory:{ (( ${words[(I)-a|--add|--unindex]} )) && _path_files -/ }"
# define new directory alias - alias "--alias=[create alias for this or given directory]:directory-alias:()" '1:directory:{ (( words[(I)--alias*] )) && _path_files -/ }'
# remove definition of directory alias - unalias "--unalias[remove definition of directory alias]" "*::directory alias:->scd-alias-target"
# act on the directory change - scd "(--all -A)"{--all,-A}"[include less likely and ignored paths]" "--list[print matching directories and exit]" "(--verbose -v)"{--verbose,-v}"[show directory ranking and full paths]" "(--push -p)"{--push,-p}"[change directory with 'pushd']" "1::directory alias:->scd-alias-target" "*:patterns:()" )
_arguments -S -C $myargs && ret=0
if [[ "$state" == scd-alias-target && -s ~/.scdalias.zsh ]]; then local -a scdaliases scdaliases=( ) eval "$(setopt extendedglob phome="(#b)(#s)${HOME}(/*)#(#e)" builtin hash -dr source ~/.scdalias.zsh && for k v in ${(kv)nameddirs}; do scdaliases+=( $k:${v/${~phome}/"~"${match[1]}} ) done complete_unalias=${+opt_args[unalias---unalias]} if (( complete_unalias && ! ${+nameddirs[OLD]} )); then scdaliases+=( 'OLD:all aliases to non-existent paths' ) fi typeset -p scdaliases )" _describe -t scdaliases scdalias scdaliases fi
|