version 1.320, 2010/02/13 01:12:16
|
version 1.322, 2010/05/04 15:21:26
|
Line 118 sub handler {
|
Line 118 sub handler {
|
# This is set and used in &handler() and is also used in |
# This is set and used in &handler() and is also used in |
# &output_results(). |
# &output_results(). |
|
|
my $loaderror=&Apache::lonnet::overloaderror($r); |
|
if ($loaderror) { return $loaderror; } |
|
# |
# |
my $closebutton; # button that closes the search window |
my $closebutton; # button that closes the search window |
# This button is different for the RAT compared to |
# This button is different for the RAT compared to |
Line 1735 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 2593 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; |