loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.692.2.2, 2008/12/11 18:41:03	version 1.692.4.1, 2009/05/19 00:16:11
Line 3880 sub get_domainconf {	Line 3880 sub get_domainconf {
if (ref($domconfig{'login'}) eq 'HASH') {	if (ref($domconfig{'login'}) eq 'HASH') {
if (keys(%{$domconfig{'login'}})) {	if (keys(%{$domconfig{'login'}})) {
foreach my $key (keys(%{$domconfig{'login'}})) {	foreach my $key (keys(%{$domconfig{'login'}})) {
if (ref($domconfig{'login'}{$key}) eq 'HASH') {	$designhash{$udom.'.login.'.$key}=$domconfig{'login'}{$key};
foreach my $img (keys(%{$domconfig{'login'}{$key}})) {
$designhash{$udom.'.login.'.$key.'_'.$img} =
$domconfig{'login'}{$key}{$img};
}
} else {
$designhash{$udom.'.login.'.$key}=$domconfig{'login'}{$key};
}
}	}
} else {	} else {
$legacy{'login'} = 1;	$legacy{'login'} = 1;