version 1.406.2.20.2.1, 2022/09/19 19:36:29
|
version 1.406.2.20.2.2, 2022/11/16 14:47:57
|
Line 256 sub build_tools_display {
|
Line 256 sub build_tools_display {
|
'textbook' => 'Can request creation of textbook courses', |
'textbook' => 'Can request creation of textbook courses', |
'requestauthor' => 'Can request author space', |
'requestauthor' => 'Can request author space', |
); |
); |
|
$isadv = &Apache::lonnet::is_advanced_user($ccdomain,$ccuname); |
if ($context eq 'requestcourses') { |
if ($context eq 'requestcourses') { |
%userenv = &Apache::lonnet::userenvironment($ccdomain,$ccuname, |
%userenv = &Apache::lonnet::userenvironment($ccdomain,$ccuname, |
'requestcourses.official','requestcourses.unofficial', |
'requestcourses.official','requestcourses.unofficial', |
Line 268 sub build_tools_display {
|
Line 269 sub build_tools_display {
|
$colspan = ' colspan="2"'; |
$colspan = ' colspan="2"'; |
%domconfig = |
%domconfig = |
&Apache::lonnet::get_dom('configuration',['requestcourses'],$ccdomain); |
&Apache::lonnet::get_dom('configuration',['requestcourses'],$ccdomain); |
$isadv = &Apache::lonnet::is_advanced_user($ccdomain,$ccuname); |
|
} elsif ($context eq 'requestauthor') { |
} elsif ($context eq 'requestauthor') { |
%userenv = &Apache::lonnet::userenvironment($ccdomain,$ccuname, |
%userenv = &Apache::lonnet::userenvironment($ccdomain,$ccuname, |
'requestauthor'); |
'requestauthor'); |
Line 290 sub build_tools_display {
|
Line 290 sub build_tools_display {
|
$currdisp,$custdisp,$custradio); |
$currdisp,$custdisp,$custradio); |
$cust_off = 'checked="checked" '; |
$cust_off = 'checked="checked" '; |
$tool_on = 'checked="checked" '; |
$tool_on = 'checked="checked" '; |
$curr_access = |
$curr_access = |
&Apache::lonnet::usertools_access($ccuname,$ccdomain,$item,undef, |
&Apache::lonnet::usertools_access($ccuname,$ccdomain,$item,undef, |
$context); |
$context,\%userenv,'', |
|
{'is_adv' => $isadv}); |
if ($context eq 'requestauthor') { |
if ($context eq 'requestauthor') { |
if ($userenv{$context} ne '') { |
if ($userenv{$context} ne '') { |
$cust_on = ' checked="checked" '; |
$cust_on = ' checked="checked" '; |
Line 1593 ENDNOTOOLSPRIV
|
Line 1594 ENDNOTOOLSPRIV
|
if ($newuser) { |
if ($newuser) { |
$r->print(' onclick="auth_check()" \>'."\n"); |
$r->print(' onclick="auth_check()" \>'."\n"); |
} else { |
} else { |
$r->print('onclick="this.form.submit()" \>'."\n"); |
$r->print(' onclick="this.form.submit()" \>'."\n"); |
} |
} |
} else { |
} else { |
$r->print('</fieldset></div>'. |
$r->print('</fieldset></div>'. |
Line 3360 sub update_user_data {
|
Line 3361 sub update_user_data {
|
&Apache::lonnet::appenv(\%newenvhash); |
&Apache::lonnet::appenv(\%newenvhash); |
} |
} |
} |
} |
|
if ($changed{'aboutme'}) { |
|
&Apache::loncommon::devalidate_aboutme_cache($env{'form.ccuname'}, |
|
$env{'form.ccdomain'}); |
|
} |
} |
} |
} |
} |
if (keys(%namechanged) > 0) { |
if (keys(%namechanged) > 0) { |