--- loncom/interface/lonsearchcat.pm 2010/02/13 01:12:16 1.320 +++ loncom/interface/lonsearchcat.pm 2010/05/04 15:21:26 1.322 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Search Catalog # -# $Id: lonsearchcat.pm,v 1.320 2010/02/13 01:12:16 raeburn Exp $ +# $Id: lonsearchcat.pm,v 1.322 2010/05/04 15:21:26 droeschl Exp $ # # Copyright Michigan State University Board of Trustees # @@ -118,8 +118,6 @@ sub handler { # This is set and used in &handler() and is also used in # &output_results(). - my $loaderror=&Apache::lonnet::overloaderror($r); - if ($loaderror) { return $loaderror; } # my $closebutton; # button that closes the search window # This button is different for the RAT compared to @@ -1735,7 +1733,7 @@ sub parse_domain_restrictions { foreach (sort @allowed_domains) { $pretty_domains_string .= "".$_." "; } - my %servers = &Apache::lonnet::get_servers(\@allowed_domains, + my %servers = &Apache::lonnet::get_unique_servers(\@allowed_domains, 'library'); $libraries_to_query = [keys(%servers)]; } @@ -2593,7 +2591,7 @@ END @Servers_to_contact = ($serverlist); } } 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)); } my %Server_status;