X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXMsg.pm;h=5fc16bd0ae569c6ed234374ece65e6d73b6d5001;hb=49e5783b757e86e6a7949ad00572c8fe6e58f293;hp=4a81a585616318756a0832a539815c442d3e3bea;hpb=324bd80ed4aef7e2636f5a03288788ce11ab2663;p=spider.git diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm index 4a81a585..5fc16bd0 100644 --- a/perl/DXMsg.pm +++ b/perl/DXMsg.pm @@ -504,7 +504,7 @@ sub queue_msg } if ($clref && !grep { $clref->{dxchan} == $_ } DXCommandmode::get_all) { $dxchan = $clref->{dxchan}; - $ref->start_msg($dxchan) if $clref && !get_busy($dxchan->call) && $dxchan->state eq 'normal'; + $ref->start_msg($dxchan) if $dxchan && $clref && !get_busy($dxchan->call) && $dxchan->state eq 'normal'; } } } elsif (!$sort) {