Revision 8186
Added by Jing Tao about 11 years ago
src/perl/ldapweb.cgi | ||
---|---|---|
364 | 364 |
errorMessage => $errorMessage }); |
365 | 365 |
exit(); |
366 | 366 |
} else { |
367 |
if ($query->param('userPassword') ne $query->param('userPassword2')) { |
|
368 |
my $errorMessage = "The passwords do not match. Try again."; |
|
369 |
fullTemplate( ['registerFailed', 'register'], { stage => "register", |
|
370 |
allParams => $allParams, |
|
371 |
errorMessage => $errorMessage }); |
|
372 |
exit(); |
|
373 |
} |
|
367 | 374 |
my $o = $query->param('o'); |
368 | 375 |
$searchBase = $ldapConfig->{$o}{'base'}; |
369 | 376 |
} |
... | ... | |
1235 | 1242 |
newrdn => "uid=" . $uid, |
1236 | 1243 |
newsuperior => $orgAttributeName . "=" . $ldaporg . "," . $orgAuthBase); |
1237 | 1244 |
$ldap->unbind; # take down session |
1238 |
if(mesg->code()) { |
|
1245 |
if($mesg->code()) {
|
|
1239 | 1246 |
fullTemplate( ['registerFailed'], {errorMessage => "Cannot move the account from the inactive area to the ative area since " . $mesg->error()}); |
1240 | 1247 |
exit(0); |
1241 | 1248 |
} else { |
Also available in: Unified diff
Add code to check if password match in the registeration.