X-Git-Url: http://scm.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=7a324625f4e9342304b1545cf2718c83ea5efa89;hb=0b0607e3fba746fc50920f2188ead0c4d0750b2c;hp=93baa8dae5759d60503ad7c6c967987141a35fa3;hpb=080a66c38925314321249190eb5a4dc572636d4b;p=spider.git

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 93baa8da..7a324625 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -97,7 +97,7 @@ sub start
 	$self->{consort} = $line;
 	$self->{outbound} = $sort eq 'O';
 	$self->{priv} = $user->priv;
-	$self->{lang} = $user->lang;
+	$self->{lang} = $user->lang || 'en';
 	$self->{isolate} = $user->{isolate};
 	$self->{consort} = $line;	# save the connection type
 	$self->{here} = 1;