loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.510, 2007/03/01 02:33:04	version 1.511, 2007/03/02 23:17:58
Line 1489 sub get_library_servers {	Line 1489 sub get_library_servers {
my %library_servers;	my %library_servers;
foreach my $hostid (keys(%Apache::lonnet::libserv)) {	foreach my $hostid (keys(%Apache::lonnet::libserv)) {
if ($Apache::lonnet::hostdom{$hostid} eq $domain) {	if ($Apache::lonnet::hostdom{$hostid} eq $domain) {
$library_servers{$hostid} = $Apache::lonnet::hostname{$hostid};	$library_servers{$hostid} = &Apache::lonnet::hostname($hostid);
}	}
}	}
return %library_servers;	return %library_servers;