X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FFilter.pm;h=abdcaba7363d8dbb2c8e682ed52a23cf644bfbeb;hb=23e50709e723c7ca87939cfd86441e22a9e5a264;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};