Invoke perl module completion with the perl executable being completed.

This commit is contained in:
Ville Skyttä 2010-11-19 21:57:38 +02:00
parent 42589ab9dc
commit 2f0948083d

View File

@ -4,7 +4,7 @@ have perl &&
{
_perlmodules()
{
COMPREPLY=( $( compgen -P "$prefix" -W "$( ${BASH_SOURCE[0]%/*}/helpers/perl modules $cur )" -- "$cur" ) )
COMPREPLY=( $( compgen -P "$prefix" -W "$( $1 ${BASH_SOURCE[0]%/*}/helpers/perl modules $cur )" -- "$cur" ) )
__ltrim_colon_completions "$prefix$cur"
}
@ -41,7 +41,7 @@ _perl()
return 0
;;
-m|-M)
_perlmodules
_perlmodules $1
return 0
;;
esac