|
version 1.120, 2006/06/02 13:58:31
|
version 1.122, 2006/06/26 22:31:56
|
|
Line 142 sub print_username_entry_form {
|
Line 142 sub print_username_entry_form {
|
| 'nr' => "Name of Role", |
'nr' => "Name of Role", |
| 'cre' => "Custom Role Editor" |
'cre' => "Custom Role Editor" |
| ); |
); |
| my $help = &Apache::loncommon::help_open_menu('',undef,undef,'',282,'Instructor Interface'); |
my $help = &Apache::loncommon::help_open_menu(undef,undef,282,'Instructor Interface'); |
| my $helpsiur=&Apache::loncommon::help_open_topic('Course_Change_Privileges'); |
my $helpsiur=&Apache::loncommon::help_open_topic('Course_Change_Privileges'); |
| my $helpecpr=&Apache::loncommon::help_open_topic('Course_Editing_Custom_Roles'); |
my $helpecpr=&Apache::loncommon::help_open_topic('Course_Editing_Custom_Roles'); |
| $r->print(<<"ENDDOCUMENT"); |
$r->print(<<"ENDDOCUMENT"); |
|
Line 1770 sub course_level_table {
|
Line 1770 sub course_level_table {
|
| foreach ('st','ta','ep','in','cc') { |
foreach ('st','ta','ep','in','cc') { |
| if (&Apache::lonnet::allowed('c'.$_,$thiscourse)) { |
if (&Apache::lonnet::allowed('c'.$_,$thiscourse)) { |
| my $plrole=&Apache::lonnet::plaintext($_); |
my $plrole=&Apache::lonnet::plaintext($_); |
| if ($type eq 'Group') { |
# Was this left in by mistake? |
| $plrole = &Apache::loncommon::convert_role($plrole,$type); |
# if ($type eq 'Group') { |
| } |
# $plrole = &Apache::loncommon::convert_role($plrole,$type); |
| |
# } |
| $table .= <<ENDEXTENT; |
$table .= <<ENDEXTENT; |
| <tr bgcolor="#$bgcol"> |
<tr bgcolor="#$bgcol"> |
| <td><input type="checkbox" name="act_$protectedcourse\_$_"></td> |
<td><input type="checkbox" name="act_$protectedcourse\_$_"></td> |
![[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