backporting callnumber sort: svn merge -r7577:7578 svn://svn.open-ils.org/ILS/trunk

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

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm b/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm
index 1262fa7..d903c90 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm
@@ -904,8 +904,10 @@ sub copy_count_summary {
        my( $self, $client, $rid, $org, $depth ) = @_;
        $org ||= 1;
        $depth ||= 0;
-       return $U->storagereq(
+    my $data = $U->storagereq(
                'open-ils.storage.biblio.record_entry.status_copy_count.atomic', $rid, $org, $depth );
+
+    return [ sort { $a->[1] cmp $b->[1] } @$data ];
 }