X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXUser.pm;h=55245a59a2a7cd2b5651dd8dd08e464c73bfe368;hb=a0cf638d2ec10e9f464bb749cf1b70fd105baf9f;hp=bc55775fc6f3e277bcfcf40e140081bbdbc6bea5;hpb=6a0068ec3df1dca0c6ae2714af3c0a4a62998dcf;p=spider.git

diff --git a/perl/DXUser.pm b/perl/DXUser.pm
index bc55775f..55245a59 100644
--- a/perl/DXUser.pm
+++ b/perl/DXUser.pm
@@ -106,6 +106,7 @@ sub new
   $self->{sort} = 'U';
   $self->{dxok} = 1;
   $self->{annok} = 1;
+  $self->{lang} = $main::lang;
   bless $self, $pkg;
   $u{call} = $self;
 }