no need for usage output

This commit is contained in:
Guillaume Rousse 2010-11-06 23:42:38 +01:00
parent 83fc41d5b1
commit 1f0dd273f7

View File

@ -84,16 +84,6 @@ sub get_function_suggestions {
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 $word = pop @arg;