From: miker Date: Wed, 9 May 2007 22:12:34 +0000 (+0000) Subject: finally found and killed the oisbn bug -- I think X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=db158c3062b882d1bb3857d42daaabe4c8997dec;p=Evergreen.git finally found and killed the oisbn bug -- I think git-svn-id: svn://svn.open-ils.org/ILS/trunk@7229 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm b/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm index e4c22cc86b..37613d0f9e 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm @@ -1055,7 +1055,7 @@ sub oISBN { # Return the oISBN data structure. This will be XMLized at a higher layer. return { metarecord => $mr->[0]->metarecord, - record_list => { map { ($_->record, $_->value) } @$recs } }; + record_list => { map { $_ ? ($_->record, $_->value) : () } @$recs } }; } __PACKAGE__->register_method(