From: Jason Boyer <JBoyer@equinoxinitiative.org>
Date: Tue, 15 Sep 2020 19:12:57 +0000 (-0400)
Subject: LP1895660: AppUtil.pm
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=2f06b53712f512e41168d89fc1b8d5bc9b854faf;p=evergreen%2Fmasslnc.git

LP1895660: AppUtil.pm

substr outside of string

unique_unnested_numbers expects a list of pg arrays, but if its given
an empty results list it tries to remove { and } from an undefined value.

Signed-off-by: Jason Boyer <JBoyer@equinoxinitiative.org>
Signed-off-by: Jane Sandberg <sandbej@linnbenton.edu>
Signed-off-by: Galen Charlton <gmc@equinoxOLI.org>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm
index f8e2f49dc1..fce9f7f165 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm
@@ -2287,6 +2287,8 @@ sub unique_unnested_numbers {
 
     no warnings 'numeric';
 
+    return undef unless ( scalar @_ );
+
     return uniq(
         map(
             int,