added loginfo stuff

[spider.git] / perl / DXMsg.pm

diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm
index 9f4a1d7b103b8b6c449da738ea884d41b8ab2f6f..a3c0798e73f948cfcebdf74665da8b069dc243fd 100644 (file)
--- a/perl/DXMsg.pm
+++ b/perl/DXMsg.pm
@@ -575,7 +575,7 @@ sub queue_msg
        my $call = shift;
        my $ref;
        my $clref;
-       my @nodelist = DXProt::get_all_ak1a();
+       my @nodelist = DXChannel::get_all_ak1a();
        
        # bat down the message list looking for one that needs to go off site and whose
        # nearest node is not busy.
@@ -824,7 +824,7 @@ sub do_send_stuff
        } elsif ($self->state eq 'sendbody') {
                confess "local var gone missing" if !ref $self->{loc};
                my $loc = $self->{loc};
-               if ($line eq "\032" || uc $line eq "/EX") {
+               if ($line eq "\032" || $line eq '%1A' || uc $line eq "/EX") {
                        my $to;
                        
                        if (@{$loc->{lines}} > 0) {