X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FSpot.pm;fp=perl%2FSpot.pm;h=f29ecef804fd2703275e97a57f96b4c98247e145;hb=043ec29d2c3f7d807f02660417696f0e93e20880;hp=b3eff00c280173abee504a4de3e765fd98c1d3bf;hpb=c3c40fa3708eb08ec5e81dbbff35deec6e2c44e4;p=spider.git diff --git a/perl/Spot.pm b/perl/Spot.pm index b3eff00c..f29ecef8 100644 --- a/perl/Spot.pm +++ b/perl/Spot.pm @@ -49,9 +49,10 @@ $filterdef = bless ([ ['by_zone', 'nz', 11], ['call_state', 'ns', 12], ['by_state', 'ns', 13], - ['channel', 'c', 14], - ['rbn', 'a', 4, 0, \&filterrbnspot], - ], 'Filter::Cmd'); + ['ip', 'c', 14], +# ['channel', 'c', 15], +# ['rbn', 'a', 4, 0, \&filterrbnspot], + ], 'Filter::Cmd'); $totalspots = $hfspots = $vhfspots = 0; $use_db_for_search = 0; @@ -231,7 +232,7 @@ sub add # $f5 = spotted dxcc country # $f6 = spotter dxcc country # $f7 = origin -# +# $f8 = ip address # # In addition you can specify a range of days, this means that it will start searching # from days less than today to days less than today @@ -311,6 +312,7 @@ sub search } } ); + dbg("Spot eval: $eval") if isdbg('searcheval');