X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FFilter.pm;h=abdcaba7363d8dbb2c8e682ed52a23cf644bfbeb;hb=77f4f8ef18caeb6cc96f114cc9a000bc72e19d1b;hp=11143825710de95d30a2f649a6449986fb34193d;hpb=412fb1b9e4070d7791f4e986b55bbc0c06f612ea;p=spider.git diff --git a/perl/Filter.pm b/perl/Filter.pm index 11143825..abdcaba7 100644 --- a/perl/Filter.pm +++ b/perl/Filter.pm @@ -195,7 +195,7 @@ sub it my $key; my $type = 'Dunno'; my $asc = '?'; - + my $r = @keys > 0 ? 0 : 1; foreach $key (@keys) { $filter = $self->{$key};