1
0
Fork 0
mirror of git://git.code.sf.net/p/zsh/code synced 2025-01-27 14:11:14 +01:00
zsh/Completion/User/_tilde_files
2000-02-25 09:53:20 +00:00

38 lines
624 B
Text

#autoload
# Complete files and expand tilde expansions in it.
if (( $argv[(I)-W*] )); then
_files "$@"
return
fi
case "$PREFIX" in
\~/*)
IPREFIX="${IPREFIX}${HOME}/"
PREFIX="${PREFIX[3,-1]}"
_files "$@" -W "${HOME}"
;;
\~*/*)
local user="${PREFIX[2,-1]%%/*}"
if (( $+userdirs[$user] )); then
user="$userdirs[$user]"
elif (( $+nameddirs[$user] )); then
user="$nameddirs[$user]"
else
_message "unknown user \`$user'"
return 1
fi
IPREFIX="${IPREFIX}${user%/}/"
PREFIX="${PREFIX#*/}"
_files "$@" -W "$user"
;;
\~*)
compset -P '?'
_users "$@"
;;
*)
_files "$@"
;;
esac