oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fixed a bug where user was not being reset in the object if authentication failed

Browse source
This commit is contained in:
Frank Dillon 2003-12-24 12:27:29 +00:00
parent 8c4172d24c
commit 8e81d9c000
1 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lib/WebGUI/Auth/SMB.pm
View file

@ -16,8 +16,8 @@ use WebGUI::HTMLForm;
use WebGUI::Form;
use WebGUI::Session;
use WebGUI::Utility;
use Authen::Smb;
use warnings;
#use Authen::Smb;
#use warnings;
our @ISA = qw(WebGUI::Auth);
@ -81,10 +81,11 @@ sub authenticate {
my $userData = $self->getParams;
if($userData->{smbLogin}){
$smb = Authen::Smb::authen($userData->{smbLogin}, $password, $userData->{smbPDC}, $userData->{smbBDC}, $userData->{smbDomain});
$error .= "<li>".$smbError{$smb} if($smb > 0);
$error = "<li>".$smbError{$smb} if($smb > 0)
}else{
$error .= "<li>".WebGUI::International::get(5,'Auth/SMB');
}
$self->user(WebGUI::User->new(1)) if $error ne "";
$self->error($error);
return $error eq "";
}