LP1638921 List display broken in 2.11

The badges feature added more data to an array which broke bib_record_list_via_search
Taking the first item in the array instead of the last item fixes the issue.
Thanks to miker and Dyrcona!

Signed-off-by: blake <blake@mobiusconsortium.org>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm
index 83b9789..093c257 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm
@@ -1913,7 +1913,7 @@ sub bib_container_items_via_search {
     }
 
     # Throw away other junk from search, keeping only bib IDs.
-    my $id_list = [ map { pop @$_ } @{$search_result->{ids}} ];
+    my $id_list = [ map { shift @$_ } @{$search_result->{ids}} ];
 
     return [] unless @$id_list;