From 1ba8e89a9ed851a1b0f2d324c8fb07767adbd81e Mon Sep 17 00:00:00 2001 From: Sven Wischnowsky Date: Mon, 2 Apr 2001 12:01:13 +0000 Subject: moved to Completion/Unix/Command/_rlogin --- Completion/User/_rlogin | 74 ------------------------------------------------- 1 file changed, 74 deletions(-) delete mode 100644 Completion/User/_rlogin (limited to 'Completion') diff --git a/Completion/User/_rlogin b/Completion/User/_rlogin deleted file mode 100644 index bdfe2b44c..000000000 --- a/Completion/User/_rlogin +++ /dev/null @@ -1,74 +0,0 @@ -#compdef rlogin rsh remsh=rsh rcp - -_rlogin () { - case "$service" in - rlogin) - _arguments -s \ - '-8[allow 8-Bit data]' \ - '-e-[specify escape character]:escape character:' \ - '-l[specify login user name]:login as:_rlogin_users' \ - ':remote host name:_rlogin_hosts' - ;; - rsh|remsh) - local context state line ret=1 - typeset -A opt_args - - _arguments -s \ - '-n[ignore stdin]' \ - '-l[specify login user name]:login as:_rlogin_users' \ - ':remote host name:_rlogin_hosts' \ - '(-):command: _command_names -e' \ - '*::command:->command' && ret=0 - - if [[ -n "$state" ]]; then - shift 1 words - (( CURRENT-- )) - _normal && ret=0 - fi - return ret - ;; - rcp) - local curcontext="$curcontext" state line ret=1 expl - typeset -A opt_args - - _arguments -C -s \ - '-p[preserve modification times]' \ - '-r[recursively copy directories]' \ - '*:files:->files' && ret=0 - - if [[ -n "$state" ]]; then - if compset -P '*:'; then - _files && ret=0 - elif compset -P '*@'; then - _wanted hosts expl host _rlogin_hosts -S: && ret=0 - else - _alternative \ - 'files:: _files' \ - 'hosts:: _rlogin_all_hosts -S:' \ - 'users:: _rlogin_users -qS@' && ret=0 - fi - fi - return ret - ;; - esac -} - -_rlogin_users () { - _tags users && _combination -s '[:@]' my-accounts users-hosts users "$@" -} - -_rlogin_hosts () { - _tags hosts && - if [[ "$IPREFIX" == *@ ]]; then - _combination -s '[:@]' my-accounts users-hosts "users=${IPREFIX/@}" hosts "$@" - else - _combination -s '[:@]' my-accounts users-hosts \ - ${opt_args[-l]:+"users=${opt_args[-l]:q}"} hosts "$@" - fi -} - -_rlogin_all_hosts () { - _tags hosts && _combination -s '[:@]' my-accounts users-hosts hosts "$@" -} - -_rlogin "$@" -- cgit 1.4.1