From db158c3062b882d1bb3857d42daaabe4c8997dec Mon Sep 17 00:00:00 2001 From: miker Date: Wed, 9 May 2007 22:12:34 +0000 Subject: [PATCH] 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 --- Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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( -- 2.11.0