--- loncom/interface/createaccount.pm 2023/01/23 22:48:27 1.72.4.7.2.2 +++ loncom/interface/createaccount.pm 2021/12/10 04:14:52 1.85 @@ -4,7 +4,7 @@ # kerberos, or SSO) or an e-mail address. Requests to use an e-mail address as # username may be processed automatically, or may be queued for approval. # -# $Id: createaccount.pm,v 1.72.4.7.2.2 2023/01/23 22:48:27 raeburn Exp $ +# $Id: createaccount.pm,v 1.85 2021/12/10 04:14:52 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -37,6 +37,7 @@ use Apache::lonacc; use Apache::lonnet; use Apache::loncommon; use Apache::lonhtmlcommon; +use Apache::lonuserutils; use Apache::lonlocal; use Apache::lonauth; use Apache::resetpw; @@ -527,7 +528,7 @@ sub javascript_checkpass { my $mismatchpass = &mt('The passwords you entered did not match.')."\n". &mt('Please try again.'); my ($numrules,$intargjs) = - &Apache::loncommon::passwd_validation_js('upass',$domain); + &Apache::lonuserutils::passwd_validation_js('upass',$domain); &js_escape(\$nopass); &js_escape(\$mismatchpass); my $js = <<"ENDSCRIPT"; @@ -740,7 +741,7 @@ sub login_box { $lonhost); $output = &serverform($logtoken,$lonhost,undef,$courseid,$context); my $unameform = ''; - my $upassform = ''; + my $upassform = ''; $output .= '
'."\n". &Apache::lonhtmlcommon::start_pick_box()."\n". &Apache::lonhtmlcommon::row_title($titles{$context},