diff options
-rw-r--r-- | ChangeLog | 7 | ||||
-rw-r--r-- | Completion/Unix/Command/.distfiles | 2 | ||||
-rw-r--r-- | Completion/Unix/Command/_texinfo | 53 |
3 files changed, 61 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog index 552ecd846..db66a1906 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,10 @@ +2002-05-23 Andrej Borsenkow <bor@zsh.org> + + * 17125, 17159 (Oliver): Completion/Unix/Command/_texinfo, + Completion/Unix/Command/.distfiles: completion for info. + As suggested by Oliver put in _texinfo expecting more + related stuff. + 2002-05-23 Sven Wischnowsky <wischnow@zsh.org> * 17196: Src/Zle/computil.c: report option arguments to diff --git a/Completion/Unix/Command/.distfiles b/Completion/Unix/Command/.distfiles index 5d340e50b..fe86ae1b2 100644 --- a/Completion/Unix/Command/.distfiles +++ b/Completion/Unix/Command/.distfiles @@ -17,5 +17,5 @@ _diff _gs _make _psutils _tin _apm _mail _last _loadkeys _modutils _ruby _sysctl _links _samba _user_admin _rsync _arping _spamassassin _mtools _ifconfig _fsh _chkconfig _cdcd _irssi _mysqldiff _sccs -_netcat _larch _valgrind +_netcat _larch _valgrind _texinfo ' diff --git a/Completion/Unix/Command/_texinfo b/Completion/Unix/Command/_texinfo new file mode 100644 index 000000000..cc07435ad --- /dev/null +++ b/Completion/Unix/Command/_texinfo @@ -0,0 +1,53 @@ +#compdef info + +_info () { + local context state line expl ret=1 + typeset -A opt_args + local -a info + + info=(_call_program info ${words[1]}) + + _arguments -s \ + '(: -)--apropos=[look up string in indices]:search string: ' \ + '(-f --file)'{\*-d,\*--directory=}'[add directory to infopath]:info dir:_files -/' \ + '--dribble=[record keystrokes]:file with keystrokes:_files' \ + '(-f --file -d --directory)'{-f,--file=}'[info file to show]:info file:_files -g "*.info(|.gz|.bz2)"' \ + '(: - -h --help)'{-h,--help}'[display usage]' \ + '(-o --output -O)--index-search=[go directly to node if found]:search string: ' \ + '(--index-search -o --output -O)'{-o,--output=}'[dump selected nodes to filename]:filename:_files -g "*(^/)"' \ + '(-R --raw-escapes)'{-R,--raw-escapes}'[do not remove ANSI escapes from man pages]' \ + '--restore=[read keystrokes from file]:filename:_files -g "*(^/)"' \ + '(--index-search -o --output -O --show-options --usage)'{-O,--show-options,--usage}'[go to command-line options node]' \ + '--subnodes[recursively output menu items]' \ + '--vi-keys[use Vi-like key bindings]' \ + '(: -)--version[display version information]' \ + '(--apropos -h --help -O --output --version)*::menu items:->item' && ret=0 + + case $state in + item ) + local -a items + + info=($info ${(kv)opt_args[(I)(-d|--directory|-f|--file)]}) + + items=(${${(M)${${(f)"$(${info} --output - ${words[1,CURRENT-1]} 2>/dev/null)"}[1,(r)[[:space:]]#--- The Detailed Node Listing ---[[:space:]]#]}:#\* *~\* Menu:*}:/(#b)\*[[:space:]]##([^:]##):(#B)( \(?##\)[^.]#.|(:|))[[:space:]]#(#b)(*)[[:space:]]#/$match[1]${match[2]:+:}$match[2]}) + + _describe -t items "menu items" items && ret=0 + ;; + esac + + return $ret +} + +_texinfo () { + local ret=1 + + case $service in + info ) + _info && ret=0 + ;; + esac + + return $ret +} + +_texinfo "$@" |