From: blake <blake@mobiusconsortium.org>
Date: Thu, 3 Nov 2016 15:42:24 +0000 (-0500)
Subject: LP1638921 List display broken in 2.11
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=0dbc5053becba1e0fc453578958ccc159dac56a5;p=evergreen%2Fpines.git

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>
Signed-off-by: Mike Rylander <miker@esilibrary.com>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm
index 83b978965f..093c257bab 100644
--- 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;