loncom/interface/lonuserutils.pm - diff

Return to lonuserutils.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.184.4.4, 2019/08/22 19:31:20	version 1.184.4.5, 2019/08/26 01:28:51
Line 655 sub passwd_validation_js {	Line 655 sub passwd_validation_js {
my %passwdconf = &Apache::lonnet::get_passwdconf($domain);	my %passwdconf = &Apache::lonnet::get_passwdconf($domain);
my ($min,$max,@chars,$numrules,$intargjs,%alert);	my ($min,$max,@chars,$numrules,$intargjs,%alert);
$numrules = 0;	$numrules = 0;
	$min = $Apache::lonnet::passwdmin;
if (ref($passwdconf{'chars'}) eq 'ARRAY') {	if (ref($passwdconf{'chars'}) eq 'ARRAY') {
if ($passwdconf{'min'} =~ /^\d+$/) {	if ($passwdconf{'min'} =~ /^\d+$/) {
$min = $passwdconf{'min'};	if ($passwdconf{'min'} > $min) {
$numrules ++;	$min = $passwdconf{'min'};
	}
}	}
if ($passwdconf{'max'} =~ /^\d+$/) {	if ($passwdconf{'max'} =~ /^\d+$/) {
$max = $passwdconf{'max'};	$max = $passwdconf{'max'};
Line 668 sub passwd_validation_js {	Line 670 sub passwd_validation_js {
if (@chars) {	if (@chars) {
$numrules ++;	$numrules ++;
}	}
} else {	}
$min = 7;	if ($min > 0) {
$numrules ++;	$numrules ++;
}	}
if (($min ne '') \|\| ($max ne '') \|\| (@chars > 0)) {	if (($min > 0) \|\| ($max ne '') \|\| (@chars > 0)) {
my $alertmsg = &mt('Initial password did not satisfy requirement(s):').'\n\n';	my $alertmsg = &mt('Initial password did not satisfy requirement(s):').'\n\n';
if ($min) {	if ($min) {
$alert{'min'} = &mt('minimum [quant,_1,character]',$min).'\n';	$alert{'min'} = &mt('minimum [quant,_1,character]',$min).'\n';