acq vandelay : acq ML acq-vandelay-matching-and-import-scratchpad
authorBill Erickson <berick@esilibrary.com>
Tue, 6 Dec 2011 16:53:46 +0000 (11:53 -0500)
committerBill Erickson <berick@esilibrary.com>
Tue, 6 Dec 2011 16:53:46 +0000 (11:53 -0500)
Signed-off-by: Bill Erickson <berick@esilibrary.com>
Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Order.pm

index fb31587..6204048 100644 (file)
@@ -340,7 +340,7 @@ sub import_li_bibs_via_vandelay {
             $queue = new Fieldmapper::vandelay::bib_queue;
             $queue->name($name); 
             $queue->owner($e->requestor->id);
-            $queue->match_set($vandelay->{match_set});
+            $queue->match_set($vandelay->{match_set} || undef); # avoid ''
             $queue = $e->create_vandelay_bib_queue($queue) or return $res;
         }
 
@@ -363,7 +363,7 @@ sub import_li_bibs_via_vandelay {
         my $vqbr = Fieldmapper::vandelay::queued_bib_record->new;
         $vqbr->marc($li->marc);
         $vqbr->queue($queue->id);
-        $vqbr->bib_source($vandelay->{bib_source} || undef);
+        $vqbr->bib_source($vandelay->{bib_source} || undef); # avoid ''
         $vqbr = $e->create_vandelay_queued_bib_record($vqbr) or return $res;
         push(@vqbr_ids, $vqbr->id);
         $mgr->add_vqbr;