X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCommandmode.pm;h=debc23d2af1dddc01fc1b5f4ed1aafd4c05896fe;hb=6f20114b034d329c1e2a4f91f0aba2f6ec4002d4;hp=80a31ed517a6829d91c4cf5ae034478403cf711f;hpb=5f2487385b59dbe88dc763fa9c26fe5a9b4a6b30;p=spider.git diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm index 80a31ed5..debc23d2 100644 --- a/perl/DXCommandmode.pm +++ b/perl/DXCommandmode.pm @@ -129,7 +129,12 @@ sub start # decide which motd to send - my $motd = "${main::motd}_nor" unless $self->{registered}; + my $motd; + unless ($self->{registered}) { + $motd = "${main::motd}_nor_$self->{lang}"; + $motd = "${main::motd}_nor" unless -e $motd; + } + $motd = "${main::motd}_$self->{lang}" unless $motd && -e $motd; $motd = $main::motd unless $motd && -e $motd; $self->send_file($motd) if -e $motd;