prettyizing oISBN
authormiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Tue, 14 Feb 2006 05:43:57 +0000 (05:43 +0000)
committermiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Tue, 14 Feb 2006 05:43:57 +0000 (05:43 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@3067 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm

index cec1d12..4920453 100644 (file)
@@ -336,7 +336,9 @@ sub oISBN {
        $_storage->disconnect;
 
        # Return the oISBN data structure.  This will be XMLized at a higher layer.
-       return { metarecord => $mr->[0]->metarecord, record_list => { map { ($_->record, $_->value) } @$recs } };
+       return
+               { metarecord => $mr->[0]->metarecord,
+                 record_list => { map { ($_->record, $_->value) } @$recs } };
 
 }
 __PACKAGE__->register_method(