version 1.287, 2009/03/14 13:30:09
|
version 1.289, 2009/04/05 17:04:56
|
Line 3141 ENDCCF
|
Line 3141 ENDCCF
|
my $privtext = &Apache::lonnet::plaintext($priv); |
my $privtext = &Apache::lonnet::plaintext($priv); |
$r->print(&Apache::loncommon::start_data_table_row(). |
$r->print(&Apache::loncommon::start_data_table_row(). |
'<td>'.$privtext.'</td><td>'. |
'<td>'.$privtext.'</td><td>'. |
($courselevel{$priv}?'<input type="checkbox" name="'.$priv.'_c" '. |
($courselevel{$priv}?'<input type="checkbox" name="'.$priv.'_c"'. |
($courselevelcurrent{$priv}?'checked="1"':'').' />':' '). |
($courselevelcurrent{$priv}?' checked="checked"':'').' />':' '). |
'</td><td>'. |
'</td><td>'. |
($domainlevel{$priv}?'<input type="checkbox" name="'.$priv.'_d" '. |
($domainlevel{$priv}?'<input type="checkbox" name="'.$priv.'_d"'. |
($domainlevelcurrent{$priv}?'checked="1"':'').' />':' '). |
($domainlevelcurrent{$priv}?' checked="checked"':'').' />':' '). |
'</td><td>'. |
'</td><td>'. |
($systemlevel{$priv}?'<input type="checkbox" name="'.$priv.'_s" '. |
($systemlevel{$priv}?'<input type="checkbox" name="'.$priv.'_s"'. |
($systemlevelcurrent{$priv}?'checked="1"':'').' />':' '). |
($systemlevelcurrent{$priv}?' checked="checked"':'').' />':' '). |
'</td>'. |
'</td>'. |
&Apache::loncommon::end_data_table_row()); |
&Apache::loncommon::end_data_table_row()); |
} |
} |
Line 3340 sub handler {
|
Line 3340 sub handler {
|
if ($env{'form.action'} ne 'dateselect') { |
if ($env{'form.action'} ne 'dateselect') { |
&Apache::lonhtmlcommon::add_breadcrumb |
&Apache::lonhtmlcommon::add_breadcrumb |
({href=>"/adm/createuser", |
({href=>"/adm/createuser", |
text=>"User Management"}); |
text=>"User Management", |
|
help=>'Course_Create_Class_List,Course_Change_Privileges,Course_View_Class_List,Course_Editing_Custom_Roles,Course_Add_Student,Course_Drop_Student,Course_Automated_Enrollment,Course_Self_Enrollment,Course_Manage_Group'}); |
} |
} |
|
#SD Following files not added to help, because the corresponding .tex-files seem to |
|
#be missing: Course_Approve_Selfenroll,Course_User_Logs, |
my ($permission,$allowed) = |
my ($permission,$allowed) = |
&Apache::lonuserutils::get_permission($context); |
&Apache::lonuserutils::get_permission($context); |
if (!$allowed) { |
if (!$allowed) { |