loncom/interface/lonpopulate.pm - diff

Return to lonpopulate.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.35, 2006/02/07 16:21:26	version 1.36, 2006/02/07 22:15:56
Line 2372 sub get_ownerinfo {	Line 2372 sub get_ownerinfo {
my ($ownername,$owneremail);	my ($ownername,$owneremail);
if ($owner) {	if ($owner) {
$ownername=&Apache::loncommon::plainname($owner,$dom,'firstname');	$ownername=&Apache::loncommon::plainname($owner,$dom,'firstname');
my %ownerinfo = &Apache::lonnet::get('environment','permanentemail',	my %ownerinfo = &Apache::lonnet::get('environment',['permanentemail'],
$dom,$owner);	$dom,$owner);
$owneremail = $ownerinfo{'permanentemail'};	$owneremail = $ownerinfo{'permanentemail'};
}	}