@@ -, +, @@ svc/bib --- svc/bib | 4 ++-- svc/new_bib | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) --- a/svc/bib +++ a/svc/bib @@ -68,7 +68,7 @@ sub fetch_bib { my $biblionumber = shift; my $record = GetMarcBiblio({ biblionumber => $biblionumber, - embed_items => $query->url_param('items') }); + embed_items => scalar $query->param('items') }); if (defined $record) { print $query->header(-type => 'text/xml',-charset => 'utf-8',); print $record->as_xml_record(); @@ -117,7 +117,7 @@ sub update_bib { ModBiblio( $record, $biblionumber, '' ); my $new_record = GetMarcBiblio({ biblionumber => $biblionumber, - embed_items => $query->url_param('items') }); + embed_items => scalar $query->url_param('items') }); $result->{'status'} = "ok"; $result->{'biblionumber'} = $biblionumber; --- a/svc/new_bib +++ a/svc/new_bib @@ -86,7 +86,7 @@ sub add_bib { $new_record = GetMarcBiblio({ biblionumber => $biblionumber, - embed_items => $query->url_param('items') }); + embed_items => scalar $query->url_param('items') }); $result->{'status'} = "ok"; $result->{'biblionumber'} = $biblionumber; my $xml = $new_record->as_xml_record(); --