loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/loncommon.pm between versions 1.1332 and 1.1335

version 1.1332, 2019/05/11 21:34:01	version 1.1335, 2020/01/10 05:08:39
Line 3571 sub check_passwd_rules {	Line 3571 sub check_passwd_rules {
my ($domain,$plainpass) = @_;	my ($domain,$plainpass) = @_;
my %passwdconf = &Apache::lonnet::get_passwdconf($domain);	my %passwdconf = &Apache::lonnet::get_passwdconf($domain);
my ($min,$max,@chars,@brokerule,$warning);	my ($min,$max,@chars,@brokerule,$warning);
	$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) {
	$min = $passwdconf{'min'};
	}
}	}
if ($passwdconf{'max'} =~ /^\d+$/) {	if ($passwdconf{'max'} =~ /^\d+$/) {
$max = $passwdconf{'max'};	$max = $passwdconf{'max'};
}	}
@chars = @{$passwdconf{'chars'}};	@chars = @{$passwdconf{'chars'}};
} else {
$min = 7;
}	}
if (($min) && (length($plainpass) < $min)) {	if (($min) && (length($plainpass) < $min)) {
push(@brokerule,'min');	push(@brokerule,'min');
Line 7257 table.LC_prior_tries td {	Line 7258 table.LC_prior_tries td {
padding: 6px;	padding: 6px;
}	}

.LC_answer_unknown {	.LC_answer_unknown,
	.LC_answer_warning {
background: orange;	background: orange;
color: black;	color: black;
padding: 6px;	padding: 6px;
Line 8253 ul.LC_funclist li {	Line 8255 ul.LC_funclist li {
cursor:pointer;	cursor:pointer;
}	}

	pre.LC_wordwrap {
	white-space: pre-wrap;
	white-space: -moz-pre-wrap;
	white-space: -pre-wrap;
	white-space: -o-pre-wrap;
	word-wrap: break-word;
	}

/*	/*
styles used for response display	styles used for response display
*/	*/

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.1332
changed lines
	Added in v.1.1335