X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fapropos.pl;h=1d6ac6bf5ab73b80715fc41098f81f1e9edea55c;hb=refs%2Fheads%2Fspider;hp=20775dd9bf9ca29f77b54ab2e470bbb19fc24fe9;hpb=27e78b3812d39874a6db249fda63f0e7b20dce71;p=spider.git diff --git a/cmd/apropos.pl b/cmd/apropos.pl index 20775dd9..1d6ac6bf 100644 --- a/cmd/apropos.pl +++ b/cmd/apropos.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; @@ -14,9 +14,10 @@ my @out; my $lang = $self->lang; $lang = 'en' if !$lang; -print "$line\n"; +#print "$line\n"; my $in; $line = 'help' unless $line; +$line =~ s/\ball\b/.*/; $line =~ s/\W//g; # remove dubious characters print "$line\n";