X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?p=spider.git;a=blobdiff_plain;f=perl%2FExtMsg.pm;h=71957817240f3793c229fecc1ba4729eaece1d1e;hp=a84b598a49b0b7461e515e593c73ecc2112ce479;hb=44ac4cfc87f3d628417502609668eaeb86d80976;hpb=c02dc2d8b544b9d682c9a068ba13bdedf40ed3bf diff --git a/perl/ExtMsg.pm b/perl/ExtMsg.pm index a84b598a..71957817 100644 --- a/perl/ExtMsg.pm +++ b/perl/ExtMsg.pm @@ -153,6 +153,7 @@ sub to_connected delete $conn->{cmd}; $conn->{timeout}->del if $conn->{timeout}; delete $conn->{timeout}; + $conn->{csort} = $sort; $conn->nolinger unless $conn->ax25; &{$conn->{rproc}}($conn, "$dir$call|$sort"); $conn->_send_file("$main::data/connected") unless $conn->{outgoing};