mirrors/zsh
1
0
Fork 0
mirror of git://git.code.sf.net/p/zsh/code synced 2025-01-17 10:20:55 +01:00
Code Releases Activity

zsh-workers/8750

Browse source
This commit is contained in:
Tanaka Akira 1999-11-23 14:35:36 +00:00
parent 616d348e39
commit de8e061ef3
1 changed files with 4 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
Completion/User/_perldoc
View file

@ -14,16 +14,10 @@ _perldoc () {
}
_perl_pods () {
local nm="$compstate[nmatches]"
local expl
_perl_modules
_perl_basepods
_description expl 'Perl modules and .pods'
_files "$expl[@]" -g '*.(pod|pm)'
[[ nm -ne "$compstate[nmatches]" ]]
_alternative \
'modules:: _perl_modules' \
'pods:: _perl_basepods' \
'files:Perl modules and .pods:_files -g \*.\(pod\|pm\)'
}
_perldoc "$@"