X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCommandmode.pm;h=a00e0be808a9d19afb85db07f9f2b3da7c1b54a0;hb=6ca24487551f66211b94d8a719e482ee3af81a29;hp=691e29b2d6b3fa928933a878ec07221b579957da;hpb=8320b88d08622ad45f3b68c551bdb53762060f79;p=spider.git diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm index 691e29b2..a00e0be8 100644 --- a/perl/DXCommandmode.pm +++ b/perl/DXCommandmode.pm @@ -143,6 +143,13 @@ sub start } $motd = "${main::motd}_$self->{lang}" unless $motd && -e $motd; $motd = $main::motd unless $motd && -e $motd; + if ($self->conn->{csort} eq 'ax25') { + if ($motd) { + $motd = "${motd}_ax25" if -e "${motd}_ax25"; + } else { + $motd = "${main::motd}_ax25" if -e "${main::motd}_ax25"; + } + } $self->send_file($motd) if -e $motd; # sort out privilege reduction