Not so fast, tex. The client sorted things, all right, but was completely messed up.

Pursue wlayton's r14015 instead for client-side sorting.

git-svn-id: svn://svn.open-ils.org/ILS/trunk@15657 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Search/Z3950.pm b/Open-ILS/src/perlmods/OpenILS/Application/Search/Z3950.pm
index aeab20e..27362a9 100755 (executable)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Search/Z3950.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Search/Z3950.pm
@@ -149,15 +149,7 @@ sub fetch_service_defs {
     };
 
     %services = %$hash; # cache these internally so we can actually use the db-configured sources
-
-    # Return a sorted list for easier handling in the client
-    my @sorted_sources;
-    foreach my $zsource (sort keys %$hash) {
-        if ($hash->{$zsource}->{name}) {
-            push @sorted_sources, $hash->{$zsource};
-        }
-    }
-    return \@sorted_sources;
+    return $hash;
 }