X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FSpot.pm;h=d14e310eefdff0ef3a35dc1d0cd988902b98d5dd;hb=7cc498cbcff1c351c3780782822c1402ab634b81;hp=8972447b7f1116612c6de228d635e879ec124b2f;hpb=4f9aaa802abf523aab9e02e17809cdc17e6035f9;p=spider.git diff --git a/perl/Spot.pm b/perl/Spot.pm index 8972447b..d14e310e 100644 --- a/perl/Spot.pm +++ b/perl/Spot.pm @@ -209,6 +209,9 @@ sub search my \@a = (Prefix::cty_data(\$s[1]))[1..3]; my \@b = (Prefix::cty_data(\$s[4]))[1..3]; push \@s, \@a[0,1], \@b[0,1], \$a[2], \$a[2]; + } else { + \$s[12] ||= ' '; + \$s[13] ||= ' '; } my (\$filter, \$hops) = \$dxchan->{spotsfilter}->it(\@s); next unless (\$filter);