Add some perl option non-completions.
This commit is contained in:
parent
2f0948083d
commit
ee1374f70b
@ -32,8 +32,10 @@ _perl()
|
|||||||
prefix=$prev
|
prefix=$prev
|
||||||
fi
|
fi
|
||||||
|
|
||||||
# only handle module completion for now
|
|
||||||
case $prev in
|
case $prev in
|
||||||
|
-D|-e|-E|-i|-F|-l)
|
||||||
|
return 0
|
||||||
|
;;
|
||||||
-I|-x)
|
-I|-x)
|
||||||
local IFS=$'\n'
|
local IFS=$'\n'
|
||||||
_compopt_o_filenames
|
_compopt_o_filenames
|
||||||
|
@ -91,6 +91,9 @@ assert_complete $options "perl -"
|
|||||||
|
|
||||||
sync_after_int
|
sync_after_int
|
||||||
|
|
||||||
|
assert_no_complete "perl -e "
|
||||||
|
sync_after_int
|
||||||
|
|
||||||
# Assuming that File::Spec and friends are always installed...
|
# Assuming that File::Spec and friends are always installed...
|
||||||
|
|
||||||
assert_complete_any "perl -MFile"
|
assert_complete_any "perl -MFile"
|
||||||
|
Loading…
x
Reference in New Issue
Block a user