X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXChannel.pm;h=10466b0f1e2be9b975cf09557179504bff97d8a6;hb=7d4b15681464d77945e7ea78ef60ed3305d57d95;hp=0e543e9cea6f424c9dfe4cc6634b8b97ef7dc74c;hpb=102b51ca564ef29e7f84d2cf65d0eaa5fdab671a;p=spider.git

diff --git a/perl/DXChannel.pm b/perl/DXChannel.pm
index 0e543e9c..10466b0f 100644
--- a/perl/DXChannel.pm
+++ b/perl/DXChannel.pm
@@ -679,6 +679,11 @@ sub broadcast_list
 			($filter) = $dxchan->{spotsfilter}->it(@{$fref}) if ref $fref;
 			next unless $filter;
 		}
+		if ($sort eq 'rbn') {
+		    next unless $dxchan->{dx}; # this is deliberate!
+			($filter) = $dxchan->{spotsfilter}->it(@{$fref}) if ref $fref;
+			next unless $filter;
+		}
 		next if $sort eq 'ann' && !$dxchan->{ann} && $s !~ /^To\s+LOCAL\s+de\s+(?:$main::myalias|$main::mycall)/i;
 		next if $sort eq 'wwv' && !$dxchan->{wwv};
 		next if $sort eq 'wcy' && !$dxchan->{wcy};