version 1.343, 2010/05/22 01:27:48
|
version 1.344, 2010/06/09 11:56:02
|
Line 2297 sub update_user_data {
|
Line 2297 sub update_user_data {
|
|
|
$r->print('<h3>'.&mt('User [_1] in domain [_2]', |
$r->print('<h3>'.&mt('User [_1] in domain [_2]', |
$env{'form.ccuname'}, $env{'form.ccdomain'}).'</h3>'); |
$env{'form.ccuname'}, $env{'form.ccdomain'}).'</h3>'); |
|
$r->print('<p class="LC_info">'.&mt('Please be patient').'</p>'); |
|
|
my (%alerts,%rulematch,%inst_results,%curr_rules); |
my (%alerts,%rulematch,%inst_results,%curr_rules); |
my @userinfo = ('firstname','middlename','lastname','generation','permanentemail','id'); |
my @userinfo = ('firstname','middlename','lastname','generation','permanentemail','id'); |
my @usertools = ('aboutme','blog','portfolio'); |
my @usertools = ('aboutme','blog','portfolio'); |
Line 2438 sub update_user_data {
|
Line 2440 sub update_user_data {
|
$r->print($error.&mt('You do not have the authority to modify this users authentification information').'.'.$end); |
$r->print($error.&mt('You do not have the authority to modify this users authentification information').'.'.$end); |
} |
} |
} |
} |
|
|
|
$r->rflush(); # Finish display of header before time consuming actions start |
|
|
## |
## |
my (@userroles,%userupdate,$cnum,$cdom,%namechanged); |
my (@userroles,%userupdate,$cnum,$cdom,%namechanged); |
if ($context eq 'course') { |
if ($context eq 'course') { |