an AFAIK nominally working (for one connection) version

[spider.git] / perl / DXMsg.pm

diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm
index 04ef99cb8ecffccfb21d7215b590a886497d2a8d..a6bde3ed1b2838f5a7ad3b5a138d9ca041ce9f06 100644 (file)
--- a/perl/DXMsg.pm
+++ b/perl/DXMsg.pm
@@ -774,7 +774,7 @@ sub queue_msg
                        next if $ref->{'read'};           # if it is read, it is stuck here
                        $clref = Route::get($ref->{to});
                        if ($clref) {
-                               $dxchan = $clref->dxchan;
+                               $dxchan = $clref->bestdxchan;
                                if ($dxchan) {
                                        if ($dxchan->is_node) {
                                                next if $clref->call eq $main::mycall;  # i.e. it lives here