X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=289498ce27afdfdf1e9ff66cf3228f2c805784a1;hb=f583c57eb08132eff72688c4615811647e8f82cb;hp=dae0b3c75255df063bf1b9b018731c39f0b0e18a;hpb=44ac4cfc87f3d628417502609668eaeb86d80976;p=spider.git

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index dae0b3c7..289498ce 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -294,7 +294,7 @@ sub start
 	$self->{consort} = $line;
 	$self->{outbound} = $sort eq 'O';
 	my $priv = $user->priv;
-	$priv = $user->priv(1) unless $priv;
+	$priv = $user->priv(1) unless defined $priv;
 	$self->{priv} = $priv;     # other clusters can always be 'normal' users
 	$self->{lang} = $user->lang || 'en';
 	$self->{isolate} = $user->{isolate};