1
0
Fork 0
mirror of git://git.code.sf.net/p/zsh/code synced 2025-09-03 10:21:46 +02:00

new vnc completion and use _guard for pine completion (14112)

This commit is contained in:
Oliver Kiddle 2001-04-26 14:00:45 +00:00
parent 727912d1cb
commit efe55f77a3
5 changed files with 42 additions and 4 deletions

View file

@ -1,3 +1,9 @@
2001-04-26 Oliver Kiddle <opk@zsh.org>
* 14112: Completion/Base/Utility/.distfiles,
Completion/Unix/Command/_pine, Completion/X/Command/.distfiles,
Completion/X/Command/_vnc: new _vnc and use of new _guard in _pine
2001-04-26 Sven Wischnowsky <wischnow@zsh.org>
* 14107: Completion/compaudit, Completion/compinstall,

View file

@ -2,7 +2,7 @@ DISTFILES_SRC='
.distfiles
_alternative _call_program _nothing _sub_commands
_arg_compile _combination _regex_arguments _values
_arguments _contexts _retrieve_cache
_arguments _contexts _retrieve_cache _guard
_cache_invalid _describe _sep_parts
_call_function _multi_parts _store_cache
'

View file

@ -31,11 +31,11 @@ _arguments -C -s \
"($opts $idx -url)-attach_and_delete[go to composer, attach file, delete when finished]:file:_files" \
"($opts $idx $send)-url[open the given URL]:url:->url" \
"($opts $send)-f+[specify mailbox to load]:mailbox: _mailboxes" \
"($opts $send)-c+[specify context to apply to -f arg]:number" \
"($opts $send)-c+[specify context to apply to -f arg]:number:_guard '[0-9]#'" \
"($opts $send)-sort[specify sort order of folder]:sort order:(${(j: :)sortorder})" \
"($opts $send)-i[go directly to index, bypassing main menu]" \
"($opts $send)-I+[specify initial keystrokes to be executed]:keystrokes" \
"($opts $send)-n+[entry in index to begin on]:number" \
"($opts $send)-n+[entry in index to begin on]:number:_guard '[0-9]#'" \
"($opts $send)-o[open first folder read-only]" \
"(-F -h)-r[restricted - can only send mail to oneself]" \
"(${opts#-F})-k[force use of function keys]" \

View file

@ -1,5 +1,5 @@
DISTFILES_SRC='
.distfiles
_gv _netscape _xauth _xfig _xrdb _xterm _xwit
_nedit _x_utils _xdvi _xmodmap _xset _xv
_nedit _vnc _x_utils _xdvi _xmodmap _xset _xv
'

32
Completion/X/Command/_vnc Normal file
View file

@ -0,0 +1,32 @@
#compdef vncserver vncviewer
local displays args
displays=( ~/.vnc/$HOST:?.pid(N:r:t:s/$HOST//) )
displays=( \\${^displays} )
case $service in
vncserver)
# currently lacking Xvnc arguments
_arguments \
- start \
'-name:desktop name:_x_name' \
'-geometry:geometry:(1600x1200 1280x1024 1152x864 1024x768 800x600 640x480)' \
'-depth:pixel depth:(8 16 24 32)' \
'-pixelformat:pixel format' \
'1::display number:_guard ":[0-9]#"' \
- kill \
"-kill:display number:($displays)" \
- help \
'-help'
;;
vncviewer)
# should allow list for -encodings
_xt_arguments -shared -viewonly -fullscreen -bgr233 -owncmap -truecolour \
'-encodings:encodings:(copyrect hextile corre rre raw)' \
'-depth:depth' \
'-passwd:file:_files' \
'(1)-listen:display number' \
'(-listen)1::display:_x_display'
;;
esac