diff options
Diffstat (limited to 'Completion/X/_xwit')
| -rw-r--r-- | Completion/X/_xwit | 152 |
1 files changed, 106 insertions, 46 deletions
diff --git a/Completion/X/_xwit b/Completion/X/_xwit index 7ec216e76..3dbce455f 100644 --- a/Completion/X/_xwit +++ b/Completion/X/_xwit @@ -3,7 +3,7 @@ local word=$'[^\0]#\0' local nul=$'\0' -local guard='-_xwit_guard -${match[1]%?}' +local guard='-_xwit_guard ${match[1]%?}' _xwit_guard () { local opt="$1" o @@ -15,58 +15,108 @@ _xwit_guard () { } _xwit_compopts () { - compadd "$expl[@]" - ${(k)no[(R)*~0]} || - compadd "$expl[@]" - ${(k)no} + local expl + local opt tmp + + tmp=() + for opt in ${(k)no[(R)*~0]} + do + if (( $+desc[$opt] )); then + tmp=("$tmp[@]" "$opt:$desc[$opt]") + else + tmp=("$tmp[@]" "$opt") + fi + done + _describe -o options tmp -- || + _describe -o options allopts -- + +# compadd "$expl[@]" - ${(k)no[(R)*~0]} || +# compadd "$expl[@]" - ${(k)no} } _regex_arguments _xwit_parse \ "/$word/" \ - \( \ - "/-/+" \ - \( "/display$nul/" "$guard" "/$word/" ':option-display:display:_x_display' \ - \| "/(sync|pop|open|iconify|unmap|root|current|select|(no|)(save|backingstore|saveunder))$nul/" "$guard" \ - \| "/resize$nul/" "$guard" \ - "/$word/" ':option-resize-width:width:_message width' \ - "/$word/" ':option-resize-height:height:_message height' \ - \| "/rows$nul/" "$guard" "/$word/" ':option-rows:rows:_message rows' \ - \| "/columns$nul/" "$guard" "/$word/" ':option-columns:columns:_message columns' \ - \| "/move$nul/" "$guard" \ - "/$word/" ':option-move-x:x:_message x' \ - "/$word/" ':option-move-y:y:_message y' \ - \| "/rmove$nul/" "$guard" \ - "/$word/" ':option-rmove-x:x:_message x' \ - "/$word/" ':option-rmove-y:y:_message y' \ - \| "/warp$nul/" "$guard" \ - "/$word/" ':option-warp-x:x:_message x' \ - "/$word/" ':option-warp-y:y:_message y' \ - \| "/rwarp$nul/" "$guard" \ - "/$word/" ':option-rwarp-x:x:_message x' \ - "/$word/" ':option-rwarp-y:y:_message y' \ - \| "/colormap$nul/" "$guard" \ - "/$word/" ':option-colormap:colormapid:_x_colormapid' \ - \| "/(name|label)$nul/" "$guard" \ - "/$word/" ':option-name:name:_x_name "$expl[@]"' \ - \| "/iconname$nul/" "$guard" \ - "/$word/" ':option-name:iconname:_x_name "$expl[@]"' \ - \| "/bitmap$nul/" "$guard" \ - "/$word/" ':option-bitmap:bitmap file:_files "$expl[@]" -g \*.xbm' \ - \| "/mask$nul/" "$guard" \ - "/$word/" ':option-mask:mask file:_files "$expl[@]" -g \*.xbm' \ - \| "/iconmove$nul/" "$guard" \ - "/$word/" ':option-iconmove-x:x:_message x' \ - "/$word/" ':option-iconmove-y:y:_message y' \ - \| "/id$nul/" "$guard" "/$word/" ':option-id:window id:_x_window' \ - \| "/(no|)keyrepeat$nul/" "$guard" \ - \( "/[0-9]##$nul/" ':option-keyrepeat-keycode:keycode:[[ -prefix [0-9]# ]] && _message keycode' \ - \( "/-$nul/" "/[0-9]##$nul/" ':option-keyrepeat-last-keycode:last keycode:[[ -prefix [0-9]# ]] && _message "last keycode"' \| \) \) \# \ - \| "/names$nul/" "$guard" \ - "/$word/" ':option-names:window name:_x_window -n' \# \ - \| "/[]/" ':options:option:_xwit_compopts' \ - \) \ + \( "/-display$nul/" "$guard" "/$word/" ':option-display:display:_x_display' \ + \| "/-(sync|pop|open|iconify|unmap|root|current|select|(no|)(save|backingstore|saveunder))$nul/" "$guard" \ + \| "/-resize$nul/" "$guard" \ + "/$word/" ':option-resize-width:width:' \ + "/$word/" ':option-resize-height:height:' \ + \| "/-rows$nul/" "$guard" "/$word/" ':option-rows:rows:' \ + \| "/-columns$nul/" "$guard" "/$word/" ':option-columns:columns:' \ + \| "/-move$nul/" "$guard" \ + "/$word/" ':option-move-x:x:' \ + "/$word/" ':option-move-y:y:' \ + \| "/-rmove$nul/" "$guard" \ + "/$word/" ':option-rmove-x:x:' \ + "/$word/" ':option-rmove-y:y:' \ + \| "/-warp$nul/" "$guard" \ + "/$word/" ':option-warp-x:x:' \ + "/$word/" ':option-warp-y:y:' \ + \| "/-rwarp$nul/" "$guard" \ + "/$word/" ':option-rwarp-x:x:' \ + "/$word/" ':option-rwarp-y:y:' \ + \| "/-colormap$nul/" "$guard" \ + "/$word/" ':option-colormap:colormapid:_x_colormapid' \ + \| "/-(name|label)$nul/" "$guard" \ + "/$word/" ':option-name:name:_x_name' \ + \| "/-iconname$nul/" "$guard" \ + "/$word/" ':option-name:iconname:_x_name' \ + \| "/-bitmap$nul/" "$guard" \ + "/$word/" ':option-bitmap:bitmap file:_files -g *.xbm' \ + \| "/-mask$nul/" "$guard" \ + "/$word/" ':option-mask:mask file:_files -g *.xbm' \ + \| "/-iconmove$nul/" "$guard" \ + "/$word/" ':option-iconmove-x:x:' \ + "/$word/" ':option-iconmove-y:y:' \ + \| "/-id$nul/" "$guard" "/$word/" ':option-id:window id:_x_window' \ + \| "/-(no|)keyrepeat$nul/" "$guard" \ + \( "/[0-9]##$nul/" ':option-keyrepeat-keycode:keycode:{[[ -prefix [0-9]# ]] && _message keycode}' \ + \( "/-$nul/" "/[0-9]##$nul/" \ + ':option-keyrepeat-last-keycode:last keycode:{[[ -prefix [0-9]# ]] && _message "last keycode"}' \| \) \) \# \ + \| "/-names$nul/" "$guard" \ + "/$word/" ':option-names:window name:_x_window -n' \# \ + \| "/[]/" ':options:option:_xwit_compopts' \ \) \# _xwit () { - typeset -A no eo + local expl allopts + typeset -A desc no eo + + desc=( + -display 'specify display' + -sync 'synchronous mode' + -pop 'pop up window' + -open 'pop up window' + -iconify 'iconify window' + -unmap 'iconify window by unmapping' + -root 'select the root window' + -current 'select the window under current pointer' + -select 'select the window interactively' + -save 'activate screen saver' + -backingstore 'enable backingstore' + -saveunder 'enable saveunder' + -nosave 'reset screen saver' + -nobackingstore 'disable backingstore' + -nosaveunder 'disable saveunder' + -resize 'resize window' + -rows 'resize window rows' + -columns 'resize window columns' + -move 'move window' + -rmove 'move window relatively' + -warp 'warp pointer' + -rwarp 'warp pointer relatively' + -colormap 'install colormap' + -name 'specify window name' + -label 'specify window name' + -iconname 'specify icon name' + -bitmap 'specify icon bitmap' + -mask 'specify icon mask' + -iconmove 'move icon' + -id 'select the window by window-ID' + -keyrepeat 'enable keyrepeat' + -nokeyrepeat 'disable keyrepeat' + -names 'select the window by name' + ) no=( -display 1 @@ -102,6 +152,16 @@ _xwit () { -names 1 ) + allopts=() + for opt in ${(k)no} + do + if (( $+desc[$opt] )); then + allopts=("$allopts[@]" "$opt:$desc[$opt]") + else + allopts=("$allopts[@]" "$opt") + fi + done + eo=( -root '-root -current -select -id -names' -current '-root -current -select -id -names' |