From: erickson Date: Thu, 13 Jul 2006 22:05:36 +0000 (+0000) Subject: added sanity checking on mods creation X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=d583fcfb67888149c61e791ed1c993ebd46b3533;p=Evergreen.git added sanity checking on mods creation git-svn-id: svn://svn.open-ils.org/ILS/trunk@4997 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm b/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm index 8b0fde7b1a..3b79517762 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm @@ -589,7 +589,7 @@ sub biblio_mrid_make_modsbatch { # grab all of the sub-records and shove them into the batch my @ids = grep { $_ ne $masterid } @$ids; - my $subrecs = $e->batch_retrieve_biblio_record_entry(\@ids); + my $subrecs = (@ids) ? $e->batch_retrieve_biblio_record_entry(\@ids) : []; for(@$subrecs) { $logger->debug("adding record ".$_->id." to mods batch for metarecord=$mrid");