From: minima Date: Sat, 15 Sep 2001 19:25:40 +0000 (+0000) Subject: make unset/logininfo not reset back to 1 after login X-Git-Tag: R_1_49~118 X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=3e6bfdd3f55497dec6b16be893c8e59b3c7e0211;p=spider.git make unset/logininfo not reset back to 1 after login --- diff --git a/Changes b/Changes index cf77e2f8..344b0574 100644 --- a/Changes +++ b/Changes @@ -1,3 +1,6 @@ +15Sep01======================================================================= +1. released 1.48 +2. found 1st bug, fixed unset/logininfo reseting itself after logout 14Sep01======================================================================= 1. added the start of script files on login/startup. You can now add commands (for example to set variables) to a file called diff --git a/perl/DXUser.pm b/perl/DXUser.pm index cbedad41..e65dd922 100644 --- a/perl/DXUser.pm +++ b/perl/DXUser.pm @@ -527,10 +527,7 @@ sub wantann_talk sub wantlogininfo { - my $self = shift; - my $n = shift; - $self->{wantlogininfo} = $n if $n; - return exists $self->{wantlogininfo} ? $self->{wantlogininfo} : 0; + return _want('logininfo', @_); } sub is_node