From 6463aa5e53666754443b2dfda5f90bfe58085f1b Mon Sep 17 00:00:00 2001 From: Clint Adams Date: Mon, 14 May 2007 19:49:29 +0000 Subject: 23439: complete sessions for -dr, -dR, -Dr, -DR, -dx, and -Dx. --- Completion/Unix/Command/_screen | 11 +++++++++++ 1 file changed, 11 insertions(+) (limited to 'Completion') diff --git a/Completion/Unix/Command/_screen b/Completion/Unix/Command/_screen index 43747fcf8..be0e3558d 100644 --- a/Completion/Unix/Command/_screen +++ b/Completion/Unix/Command/_screen @@ -75,7 +75,11 @@ _arguments -C \ '-p[preselect the named window]:window number or name:((\=\:windowlist -\:blank\ window \:window\ number))' \ '-q[quiet startup, exit with non-zero return code if unsuccessful]' \ '-r[reattach to a detached screen process]: :->detached-sessions' \ + '-Dr: :->any-sessions' \ + '-dr: :->any-sessions' \ '-R[reattach if possible, otherwise start a new session]: :->detached-sessions' \ + '-DR: :->any-sessions' \ + '-dR: :->any-sessions' \ '-s[shell to execute rather than $SHELL]:shell name: _command_names -e' \ '-S[name this session .sockname instead of ..]:session name' \ "-t[set title (window's name)]:title" \ @@ -84,6 +88,8 @@ _arguments -C \ '(-)-v[print screen version]' \ '(-)-wipe[do nothing, clean up SockDir]' \ '-x[attach to a not detached screen (multi display mode)]: :->attached-sessions' \ + '-Dx: :->any-sessions' \ + '-dx: :->any-sessions' \ '-X[execute command as a screen command in the specified session]:screencmd:(${scr_cmds[@]})' \ '*::arguments: _normal' @@ -101,6 +107,11 @@ if [[ -n $state ]]; then -ls)"}:#*[Dd]etached*}##[[:blank:]]}%%[[:blank:]]*} ) ;; + any-sessions) + sessions=( + ${${${(M)${(f)"$(_call_program screen-sessions $words[1] \ + -ls)"}:#*tached*}##[[:blank:]]}%%[[:blank:]]*} + ) esac # check if initial PID is necessary to make sessions unambiguous -- cgit 1.4.1