more bug fixes

This commit is contained in:
JT Smith 2005-03-18 05:14:02 +00:00
parent f232b6facb
commit 40065e93e8
10 changed files with 33 additions and 18 deletions

View file

@ -172,7 +172,7 @@ sub authenticate {
sub createAccount {
my $self = shift;
my $vars;
if ($session{user}{userId} != 1) {
if ($session{user}{userId} ne "1") {
return $self->displayAccount;
} elsif (!$session{setting}{anonymousRegistration}) {
return $self->displayLogin;
@ -268,7 +268,7 @@ sub displayAccount {
sub displayLogin {
my $self = shift;
my $vars;
return $self->displayAccount($_[0]) if ($self->userId != 1);
return $self->displayAccount($_[0]) if ($self->userId ne "1");
$vars->{'login.message'} = $_[0] if ($_[0]);
return $self->SUPER::displayLogin("login",$vars);
}