From: minima <minima>
Date: Mon, 1 Oct 2001 11:09:23 +0000 (+0000)
Subject: make login info not default
X-Git-Tag: R_1_49~101
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=55728c213e0afdfebbbc5bf039ccb47f1eb6a0b0;p=spider.git

make login info not default
---

diff --git a/Changes b/Changes
index f9d64c6d..0ea38112 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,5 @@
+01Oct01=======================================================================
+1. made login info not the default
 30Sep01=======================================================================
 1. made some small bug fixes in rspf checking and also messages. 
 23Sep01=======================================================================
diff --git a/perl/DXUser.pm b/perl/DXUser.pm
index e65dd922..ddcbc954 100644
--- a/perl/DXUser.pm
+++ b/perl/DXUser.pm
@@ -527,7 +527,10 @@ sub wantann_talk
 
 sub wantlogininfo
 {
-	return _want('logininfo', @_);
+	my $self = shift;
+	my $val = shift;
+	$self->{wantlogininfo} = $val if defined $val;
+	return $self->{wantlogininfo};
 }
 
 sub is_node