From: Bill Erickson <berick@esilibrary.com>
Date: Mon, 1 Aug 2011 22:02:56 +0000 (-0400)
Subject: prevent uninit string warnings
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=f3b6bade915bb40580229b193e5067c26a04d0cb;p=evergreen%2Fequinox.git

prevent uninit string warnings

Signed-off-by: Bill Erickson <berick@esilibrary.com>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm
index cc39afa654..62ad13c927 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm
@@ -43,7 +43,7 @@ sub _prepare_biblio_search_basics {
             $query = '^' . $query . '$';
         }
 
-        $bool = ($bool eq 'or') ? '||' : '&&';
+        $bool = ($bool and $bool eq 'or') ? '||' : '&&';
         $full_query = $full_query ? "($full_query $bool $query)" : $query;
         push @chunks, $query;
     }