mirror of
git://git.code.sf.net/p/zsh/code
synced 2024-11-19 21:44:11 +01:00
24 lines
457 B
Plaintext
24 lines
457 B
Plaintext
#compdef perldoc
|
|
#
|
|
# _perldoc - zsh completion function for perldoc
|
|
#
|
|
# Adam Spiers <adam@spiers.net>
|
|
#
|
|
|
|
_perldoc () {
|
|
_arguments -s \
|
|
'-h:help:' \
|
|
'(-q)-f:Perl built-in function:_perl_builtin_funcs:*:' \
|
|
'(-f)-q:Perl FAQ keyword:' \
|
|
'*:Perl pod pages:_perl_pods'
|
|
}
|
|
|
|
_perl_pods () {
|
|
_alternative \
|
|
'modules:: _perl_modules' \
|
|
'pods:: _perl_basepods' \
|
|
'files:Perl modules and .pods:_files -g \*.\(pod\|pm\)'
|
|
}
|
|
|
|
_perldoc "$@"
|