+ my $want = 0;
+ ++$want if $user->wantbeacon && $mode =~ /^BEA|NCD/;
+ ++$want if $user->wantcw && $mode =~ /^CW/;
+ ++$want if $user->wantrtty && $mode =~ /^RTTY/;
+ ++$want if $user->wantpsk && $mode =~ /^PSK/;
+ ++$want if $user->wantcw && $mode =~ /^CW/;
+ ++$want if $user->wantft && $mode =~ /^FT/;
+
+ ++$want unless $want; # send everything if nothing is selected.
+
+ $dxchan->send($line) if $want;
+ dbg("RBN: $line") if isdbg('progress');
+ }
+}