loncom/interface/lonsearchcat.pm - diff

Return to lonsearchcat.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.321, 2010/05/03 16:41:51	version 1.322, 2010/05/04 15:21:26
Line 1733 sub parse_domain_restrictions {	Line 1733 sub parse_domain_restrictions {
foreach (sort @allowed_domains) {	foreach (sort @allowed_domains) {
$pretty_domains_string .= "<b>".$_."</b> ";	$pretty_domains_string .= "<b>".$_."</b> ";
}	}
my %servers = &Apache::lonnet::get_servers(\@allowed_domains,	my %servers = &Apache::lonnet::get_unique_servers(\@allowed_domains,
'library');	'library');
$libraries_to_query = [keys(%servers)];	$libraries_to_query = [keys(%servers)];
}	}
Line 2591 END	Line 2591 END
@Servers_to_contact = ($serverlist);	@Servers_to_contact = ($serverlist);
}	}
} else {	} else {
my %all_library_servers = &Apache::lonnet::all_library();	my %all_library_servers = &Apache::lonnet::unique_library();
@Servers_to_contact = sort(keys(%all_library_servers));	@Servers_to_contact = sort(keys(%all_library_servers));
}	}
my %Server_status;	my %Server_status;