diff options
| author | Oliver Kiddle <opk@users.sourceforge.net> | 2005-06-08 12:45:24 +0000 |
|---|---|---|
| committer | Oliver Kiddle <opk@users.sourceforge.net> | 2005-06-08 12:45:24 +0000 |
| commit | 0ba8ae87eac21281e0b17eb9cbb523d133067a4a (patch) | |
| tree | 614cc49ce90c3c2562f83d6739f8ea76dc75d7f0 /Completion/Unix/Command/_perldoc | |
| parent | 9181f0e3059862d2d8cc109bc849f8705cbbc23c (diff) | |
| download | zsh-0ba8ae87eac21281e0b17eb9cbb523d133067a4a.tar.gz zsh-0ba8ae87eac21281e0b17eb9cbb523d133067a4a.tar.xz zsh-0ba8ae87eac21281e0b17eb9cbb523d133067a4a.zip | |
21315: make completion functions give precendence to descriptions passed as
parameters and cleanup descriptons in calling functions
Diffstat (limited to 'Completion/Unix/Command/_perldoc')
| -rw-r--r-- | Completion/Unix/Command/_perldoc | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Completion/Unix/Command/_perldoc b/Completion/Unix/Command/_perldoc index 869dbae3a..7a3d806c5 100644 --- a/Completion/Unix/Command/_perldoc +++ b/Completion/Unix/Command/_perldoc @@ -49,9 +49,9 @@ case $state in _files -g "*.(pod|pm)(-.)" && ret=0 else _alternative \ - 'modules:: _perl_modules' \ - 'pods:: _perl_basepods' \ - 'files:Perl modules and .pods:_files -g "*.(pod|pm)(-.)"' && ret=0 + 'modules:module: _perl_modules' \ + 'pods:base pod: _perl_basepods' \ + 'files:module or .pod file:_files -g "*.(pod|pm)(-.)"' && ret=0 fi ;; esac |