loncom/interface/lonuserutils.pm - diff

Return to lonuserutils.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.184.4.9, 2020/05/02 20:34:53	version 1.184.4.10, 2021/08/24 00:22:59
Line 543 END	Line 543 END
case 'krb':	case 'krb':
alertmsg = '$alert{'krb'}';	alertmsg = '$alert{'krb'}';
break;	break;
case 'loc':
case 'int':	case 'int':
alertmsg = '$alert{'ipass'}';	alertmsg = '$alert{'ipass'}';
break;	break;
case 'fsys':	case 'fsys':
alertmsg = '$alert{'ipass'}';	alertmsg = '$alert{'ipass'}';
break;	break;
	case 'loc':
	alertmsg = '';
	break;
default:	default:
alertmsg = '';	alertmsg = '';
}	}
Line 5115 sub passwdrule_alerts {	Line 5117 sub passwdrule_alerts {
my %passwdconf = &Apache::lonnet::get_passwdconf($domain);	my %passwdconf = &Apache::lonnet::get_passwdconf($domain);
$warning = '<b>'.&mt('Password requirement(s) unmet for one or more users:').'</b><ul>';	$warning = '<b>'.&mt('Password requirement(s) unmet for one or more users:').'</b><ul>';
if ($showrules{'min'}) {	if ($showrules{'min'}) {
$warning .= '<li>'.&mt('minimum [quant,_1,character]',$passwdconf{'min'}).'</li>';	my $min = $passwdconf{'min'};
	if ($min eq '') {
	$min = $Apache::lonnet::passwdmin;
	}
	$warning .= '<li>'.&mt('minimum [quant,_1,character]',$min).'</li>';
}	}
if ($showrules{'max'}) {	if ($showrules{'max'}) {
$warning .= '<li>'.&mt('maximum [quant,_1,character]',$passwdconf{'max'}).'</li>';	$warning .= '<li>'.&mt('maximum [quant,_1,character]',$passwdconf{'max'}).'</li>';