blob: 9a017a184964411f8b6d5469d28acec110c321a7 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
#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 "$@"
|
