version 1.234, 2009/08/23 04:02:47
|
version 1.236, 2009/10/30 05:10:03
|
Line 1590 ENDTWO
|
Line 1590 ENDTWO
|
|
|
sub role_select_row { |
sub role_select_row { |
my ($roles,$title,$css_class,$show_separate_custom,$cdom,$cnum) = @_; |
my ($roles,$title,$css_class,$show_separate_custom,$cdom,$cnum) = @_; |
|
my $crstype = 'Course'; |
|
if ($cdom ne '' && $cnum ne '') { |
|
$crstype = &Apache::loncommon::course_type($cdom.'_'.$cnum); |
|
} |
my $output; |
my $output; |
if (defined($title)) { |
if (defined($title)) { |
$output = &row_title($title,$css_class); |
$output = &row_title($title,$css_class); |
Line 1614 sub role_select_row {
|
Line 1618 sub role_select_row {
|
$plrole = &mt('Custom Role'); |
$plrole = &mt('Custom Role'); |
} |
} |
} else { |
} else { |
$plrole=&Apache::lonnet::plaintext($role); |
$plrole=&Apache::lonnet::plaintext($role,$crstype); |
} |
} |
if (($role ne 'cr') || (!$show_separate_custom)) { |
if (($role ne 'cr') || (!$show_separate_custom)) { |
$output .= ' <option value="'.$role.'">'.$plrole.'</option>'; |
$output .= ' <option value="'.$role.'">'.$plrole.'</option>'; |
Line 2023 sub set_form_elements {
|
Line 2027 sub set_form_elements {
|
} |
} |
} |
} |
$output .= " |
$output .= " |
|
return; |
}\n"; |
}\n"; |
return $output; |
return $output; |
} |
} |