loncom/interface/loncreateuser.pm - diff

Return to loncreateuser.pm CVS log

Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/loncreateuser.pm between versions 1.286 and 1.288

version 1.286, 2009/03/09 05:25:40	version 1.288, 2009/04/04 20:06:37
Line 1591 sub personal_data_display {	Line 1591 sub personal_data_display {
}	}
} else {	} else {
if ($context eq 'selfcreate') {	if ($context eq 'selfcreate') {
if ($canmodify{$item}) {	if (($item eq 'permanentemail') && ($newuser eq 'email')) {
$row .= '<input type="text" name="c'.$item.'" size="'.$textboxsize{$item}.'" value="" />';	$row .= $ccuname;
$editable ++;
} else {	} else {
$hiderow = 1;	if ($canmodify{$item}) {
	$row .= '<input type="text" name="c'.$item.'" size="'.$textboxsize{$item}.'" value="" />';
	$editable ++;
	} else {
	$hiderow = 1;
	}
}	}
} else {	} else {
$row .= '<input type="text" name="c'.$item.'" size="'.$textboxsize{$item}.'" value="" />';	$row .= '<input type="text" name="c'.$item.'" size="'.$textboxsize{$item}.'" value="" />';
Line 3137 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());
}	}

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.286
changed lines
	Added in v.1.288