X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FFilter.pm;h=abdcaba7363d8dbb2c8e682ed52a23cf644bfbeb;hb=47597a3f8635c4d4de89419c0c808ddcda59b9d5;hp=11143825710de95d30a2f649a6449986fb34193d;hpb=c7b8633ac755627ff5ff4b991c52205016ee4e2e;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};