|
version 1.406.2.18, 2020/05/02 20:57:12
|
version 1.406.2.19, 2020/09/09 02:16:05
|
|
Line 2973 sub update_user_data {
|
Line 2973 sub update_user_data {
|
| $env{'form.ccdomain'},$env{'form.ccuname'}); |
$env{'form.ccdomain'},$env{'form.ccuname'}); |
| } |
} |
| } |
} |
| $r->print('<br />'.&mt('Home server').': '.$uhome.' '. |
$r->print('<br />'.&mt('Home Server').': '.$uhome.' '. |
| &Apache::lonnet::hostname($uhome)); |
&Apache::lonnet::hostname($uhome)); |
| } elsif (($env{'form.login'} ne 'nochange') && |
} elsif (($env{'form.login'} ne 'nochange') && |
| ($env{'form.login'} ne '' )) { |
($env{'form.login'} ne '' )) { |
|
Line 2988 sub update_user_data {
|
Line 2988 sub update_user_data {
|
| &Apache::lonnet::modifyuserauth( |
&Apache::lonnet::modifyuserauth( |
| $env{'form.ccdomain'},$env{'form.ccuname'}, |
$env{'form.ccdomain'},$env{'form.ccuname'}, |
| $amode,$genpwd)); |
$amode,$genpwd)); |
| $r->print('<br />'.&mt('Home server').': '.&Apache::lonnet::homeserver |
$r->print('<br />'.&mt('Home Server').': '.&Apache::lonnet::homeserver |
| ($env{'form.ccuname'},$env{'form.ccdomain'})); |
($env{'form.ccuname'},$env{'form.ccdomain'})); |
| } else { |
} else { |
| # Okay, this is a non-fatal error. |
# Okay, this is a non-fatal error. |
![[BACK]](/icons/back.gif){kind=icon}
Return to loncreateuser.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface