loncom/interface/loncreateuser.pm - diff

Return to loncreateuser.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.122, 2006/06/26 22:31:56	version 1.123, 2006/06/27 17:48:53
Line 1598 sub custom_role_editor {	Line 1598 sub custom_role_editor {
ENDCCF	ENDCCF
foreach my $priv (sort keys %full) {	foreach my $priv (sort keys %full) {
my $privtext = &Apache::lonnet::plaintext($priv);	my $privtext = &Apache::lonnet::plaintext($priv);
if ($env{'course.'.$env{'request.course.id'}.'.type'}) {
$privtext =~ s/Student/Member/;
$privtext =~ s/student/member/;
$privtext =~ s/course/group/;
}
$r->print('<tr><td>'.$privtext.'</td><td>'.	$r->print('<tr><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="1"':'').' />':' ').