loncom/interface/loncreateuser.pm - diff

Return to loncreateuser.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.252, 2008/07/13 00:15:14	version 1.254, 2008/07/13 09:53:16
Line 1411 sub personal_data_display {	Line 1411 sub personal_data_display {
$rolesarray = \@inststatuses;	$rolesarray = \@inststatuses;
}	}
}	}
if (!$newuser \|\| $context eq 'selfcreate') {	if (!$newuser) {
# Get the users information	# Get the users information
%userenv = &Apache::lonnet::get('environment',	%userenv = &Apache::lonnet::get('environment',
['firstname','middlename','lastname','generation',	['firstname','middlename','lastname','generation',
'permanentemail','id'],$ccdomain,$ccuname);	'permanentemail','id'],$ccdomain,$ccuname);
	}
	if ((!$newuser) \|\| ($context eq 'selfcreate')) {
%canmodify =	%canmodify =
&Apache::lonuserutils::can_modify_userinfo($context,$ccdomain,	&Apache::lonuserutils::can_modify_userinfo($context,$ccdomain,
\@userinfo,$rolesarray);	\@userinfo,$rolesarray);
Line 1460 sub personal_data_display {	Line 1462 sub personal_data_display {
} else {	} else {
$hiderow = 1;	$hiderow = 1;
}	}
	} else {
	$row .= '<input type="text" name="c'.$item.'" size="'.$textboxsize{$item}.'" value="" />';
}	}
}	}
} else {	} else {
Line 1470 sub personal_data_display {	Line 1474 sub personal_data_display {
} else {	} else {
$hiderow = 1;	$hiderow = 1;
}	}
	} else {
	$row .= '<input type="text" name="c'.$item.'" size="'.$textboxsize{$item}.'" value="" />';
}	}
}	}
} else {	} else {