no need for usage output
This commit is contained in:
parent
83fc41d5b1
commit
1f0dd273f7
@ -84,16 +84,6 @@ sub get_function_suggestions {
|
|||||||
return grep { /$func_rx/ } @suggestion;
|
return grep { /$func_rx/ } @suggestion;
|
||||||
}
|
}
|
||||||
|
|
||||||
sub usage {
|
|
||||||
die map "\n$_\n", (
|
|
||||||
"To use, issue the following command in bash:",
|
|
||||||
"\tcomplete -C perldoc-complete -o nospace -o default perldoc",
|
|
||||||
"You probably want to put that line in your ~/.bashrc file.\n",
|
|
||||||
);
|
|
||||||
}
|
|
||||||
|
|
||||||
usage() if not exists $ENV{'COMP_LINE'};
|
|
||||||
|
|
||||||
my ( $cmd, @arg ) = get_command_line();
|
my ( $cmd, @arg ) = get_command_line();
|
||||||
my $word = pop @arg;
|
my $word = pop @arg;
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user