diff options
| -rw-r--r-- | Completion/Unix/Command/_perldoc | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/Completion/Unix/Command/_perldoc b/Completion/Unix/Command/_perldoc new file mode 100644 index 000000000..9a017a184 --- /dev/null +++ b/Completion/Unix/Command/_perldoc @@ -0,0 +1,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 "$@" |