From: Galen Charlton <gmc@esilibrary.com>
Date: Thu, 4 Feb 2016 20:47:00 +0000 (-0500)
Subject: LP#1549505: fix crash displaying list of a record's badges
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=b0124b7a845dc31b1ef585082ef8736170a01f9b;p=working%2FEvergreen.git

LP#1549505: fix crash displaying list of a record's badges

Signed-off-by: Galen Charlton <gmc@esilibrary.com>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm
index ac3783a29c..2488bf7698 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm
@@ -68,7 +68,7 @@ sub load_record {
 
     if ($self->cgi->param('badges')) {
         my $badges = $self->cgi->param('badges');
-        $badges = $badges ? split(',', $badges) : [];
+        $badges = $badges ? [split(',', $badges)] : [];
         $badges = [grep { /^\d+$/ } @$badges];
         if (@$badges) {
             $self->ctx->{badge_scores} = $cstore->request(