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

merging 6.8 bugfixes

Browse source
This commit is contained in:
Roy Johnson 2006-02-12 23:23:54 +00:00
parent 3a174e4eb5
commit 4e7fbea4a7
3 changed files with 18 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

14
lib/WebGUI/Auth/WebGUI.pm
View file

@ -194,15 +194,21 @@ sub createAccount {
#-------------------------------------------------------------------
sub createAccountSave {
my $self = shift;
return $self->displayAccount if ($self->session->user->userId ne "1");
my $i18n = WebGUI::International->new($self->session);
return $self->displayAccount if ($self->session->user->userId ne "1");
#Make sure anonymous registration is enabled
unless ($self->session->setting->get("anonymousRegistration")) {
$self->session->errorHandler->security($i18n->get("no registration hack", "AuthWebGUI"));
return $self->displayLogin;
}
my $username = $self->session->form->process('authWebGUI.username');
my $password = $self->session->form->process('authWebGUI.identifier');
my $passConfirm = $self->session->form->process('authWebGUI.identifierConfirm');
my $error;
my $i18n = WebGUI::International->new($self->session);
$error = $self->error unless($self->validUsername($username));
if ($self->session->setting->get("webguiUseCaptcha")) {
unless ($self->session->form->process('authWebGUI.captcha.validation') eq Digest::MD5::md5_base64(lc($self->session->form->process('authWebGUI.captcha')))) {