Z39.50 Batch Search/Overlay ML repair

Avoid setting the bucket match-set value when the value is "", which
results in a value of '0' in the database.

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

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Search/Z3950.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Search/Z3950.pm
index f9c88df..a730bed 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Search/Z3950.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Search/Z3950.pm
@@ -638,7 +638,8 @@ sub create_z39_bucket_queue {
     $queue->match_bucket($bucket_id);
     $queue->owner($e->requestor->id);
     $queue->name($vandelay->{queue_name});
-    $queue->match_set($vandelay->{match_set});
+    $queue->match_set($vandelay->{match_set})
+        if $vandelay->{match_set}; # avoid ""
 
     $e->xact_begin;
     unless ($e->create_vandelay_bib_queue($queue)) {