X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FQXProt.pm;h=10ad4aa47498bee27e518f7e669875220dcfdcba;hb=f84b465bd691c4a5c7d94e903ec7de0f84a03fbc;hp=38d878ed3b73be1ffcac23e0807a319219af0952;hpb=26bef9a106b74abceabc68cab21c9b9e9284266d;p=spider.git

diff --git a/perl/QXProt.pm b/perl/QXProt.pm
index 38d878ed..10ad4aa4 100644
--- a/perl/QXProt.pm
+++ b/perl/QXProt.pm
@@ -163,7 +163,7 @@ sub handleI
 	my $self = shift;
 	
 	my @f = split /\^/, $_[3];
-	if ($self->passphrase && $f[7] && $f[8]) {
+	if ($self->user->passphrase && $f[7] && $f[8]) {
 		my $inv = Verify->new($f[7]);
 		unless ($inv->verify($f[8], $main::me->user->passphrase, $main::mycall, $self->call)) {
 			$self->sendnow('D','Sorry...');