LP 1549505: Fix syntax error in OpenILS/WWW/EGCatLoader/Record.pm

Typo/error apparently introduced on line 72 in commit eeee27c.

Signed-off-by: Jason Stephenson <jstephenson@mvlcstaff.org>

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 0253478..04f3cbe 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm
@@ -69,7 +69,7 @@ sub load_record {
     if ($self->cgi->param('badges')) {
         my $badges = $self->cgi->param('badges');
         $badges = $badges ? [split(',', $badges)] : [];
-        $badges = [grep { /^\d+$/ }, @$badges];
+        $badges = [grep { /^\d+$/ } @$badges];
         if (@$badges) {
             $self->ctx->{badge_scores} = $cstore->request(
                 'open-ils.cstore.direct.rating.record_badge_score.search.atomic',