put a check for an empty filter command line

[spider.git] / cmd / reject / spots.pl

diff --git a/cmd/reject/spots.pl b/cmd/reject/spots.pl
index 0a3f77ec318abd9902098268178672e4e70005b4..b07493219b4c63d43f10ee0eb90dbaba1fa78226 100644 (file)
--- a/cmd/reject/spots.pl
+++ b/cmd/reject/spots.pl
@@ -9,6 +9,8 @@
 my ($self, $line) = @_;
 my $sort = 'reject';
 
+return (0, $self->msg('filter5')) unless $line;
+
 my ($r, $filter, $fno, $user, $s) = $Spot::filterdef->parse($self, $line);
 return (0, $filter) if $r;