X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProtHandle.pm;h=d55e15e362ecec7b5e83d8f5cac7ee563d548019;hb=05bed9a172a48255aff58f64ab01df58a4d87891;hp=d4ef2c1d849b40fe46abbe03a3c5a9753ca658c5;hpb=7bb8e1e37a19c197b2bc1f47a6ee07bccb368b74;p=spider.git

diff --git a/perl/DXProtHandle.pm b/perl/DXProtHandle.pm
index d4ef2c1d..d55e15e3 100644
--- a/perl/DXProtHandle.pm
+++ b/perl/DXProtHandle.pm
@@ -1744,14 +1744,16 @@ sub handle_93
 		# convert to PC10 talks where appropriate
 		my $ref = Route::get($to);
 		if ($ref) {
-			my @dxchan = $ref->alldxchan;
-			for $dxchan (@dxchan) {
+			# just go for the "best" one for now (rather than broadcast)
+			$dxchan = $ref->dxchan;
+#			my @dxchan = $ref->alldxchan;
+#			for $dxchan (@dxchan) {
 				if ($dxchan->{do_pc9x}) {
 					$dxchan->send($line);
 				} else {
 					$dxchan->talk($from, $to, $via, $text, $onode);
 				}
-			}
+#			}
 			return;
 		}