Bug 16522: (follow-up) MARC display templates and get_marc_host fixes

[srvgit] / basket / basket.pl

diff --git a/basket/basket.pl b/basket/basket.pl
index c1e76eb..54fabe4 100755 (executable)
--- a/basket/basket.pl
+++ b/basket/basket.pl
@@ -96,7 +96,9 @@ foreach my $biblionumber ( @bibs ) {
     $dat->{MARCSERIES}  = $marcseriesarray;
     $dat->{MARCURLS}    = $marcurlsarray;
     $dat->{HASAUTHORS}  = $hasauthors;
-    $dat->{HOSTITEMENTRIES} = $biblio->get_marc_host;
+    my ( $host, $relatedparts ) = $biblio->get_marc_host;
+    $dat->{HOSTITEMENTRIES} = $host;
+    $dat->{RELATEDPARTS} = $relatedparts;
 
     push( @results, $dat );
 }