diff --git a/completions/helpers/perldoc b/completions/helpers/perldoc index 2b7b7eb5..6e7a16d6 100755 --- a/completions/helpers/perldoc +++ b/completions/helpers/perldoc @@ -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;