perldoc: Use perldoc itself instead of man.
This commit is contained in:
parent
923e20fd74
commit
bc6fb7d711
@ -117,7 +117,7 @@ _perldoc()
|
|||||||
_perlmodules $perl
|
_perlmodules $perl
|
||||||
if [[ $cur == p* ]]; then
|
if [[ $cur == p* ]]; then
|
||||||
COMPREPLY+=( $( compgen -W \
|
COMPREPLY+=( $( compgen -W \
|
||||||
'$( MANPAGER=/bin/cat PAGER=/bin/cat man perl | \
|
'$( PERLDOC_PAGER=/bin/cat "$1" -u perl | \
|
||||||
sed -ne "/perl.*Perl overview/,/perlwin32/p" | \
|
sed -ne "/perl.*Perl overview/,/perlwin32/p" | \
|
||||||
awk "\$NF=2 && \$1 ~ /^perl/ { print \$1 }" )' \
|
awk "\$NF=2 && \$1 ~ /^perl/ { print \$1 }" )' \
|
||||||
-- "$cur" ) )
|
-- "$cur" ) )
|
||||||
|
Loading…
x
Reference in New Issue
Block a user