View | Details | Raw Unified | Return to bug 19536
Collapse All | Expand All

(-)a/svc/bib (-2 / +2 lines)
Lines 68-74 sub fetch_bib { Link Here
68
    my $biblionumber = shift;
68
    my $biblionumber = shift;
69
    my $record = GetMarcBiblio({
69
    my $record = GetMarcBiblio({
70
        biblionumber => $biblionumber,
70
        biblionumber => $biblionumber,
71
        embed_items  => $query->url_param('items') });
71
        embed_items  => scalar $query->param('items') });
72
    if  (defined $record) {
72
    if  (defined $record) {
73
        print $query->header(-type => 'text/xml',-charset => 'utf-8',);
73
        print $query->header(-type => 'text/xml',-charset => 'utf-8',);
74
        print $record->as_xml_record();
74
        print $record->as_xml_record();
Lines 117-123 sub update_bib { Link Here
117
        ModBiblio( $record, $biblionumber, '' );
117
        ModBiblio( $record, $biblionumber, '' );
118
        my $new_record = GetMarcBiblio({
118
        my $new_record = GetMarcBiblio({
119
            biblionumber => $biblionumber,
119
            biblionumber => $biblionumber,
120
            embed_items  => $query->url_param('items') });
120
            embed_items  => scalar $query->url_param('items') });
121
121
122
        $result->{'status'} = "ok";
122
        $result->{'status'} = "ok";
123
        $result->{'biblionumber'} = $biblionumber;
123
        $result->{'biblionumber'} = $biblionumber;
(-)a/svc/new_bib (-2 / +1 lines)
Lines 86-92 sub add_bib { Link Here
86
86
87
        $new_record = GetMarcBiblio({
87
        $new_record = GetMarcBiblio({
88
            biblionumber => $biblionumber,
88
            biblionumber => $biblionumber,
89
            embed_items  => $query->url_param('items') });
89
            embed_items  => scalar $query->url_param('items') });
90
        $result->{'status'} = "ok";
90
        $result->{'status'} = "ok";
91
        $result->{'biblionumber'} = $biblionumber;
91
        $result->{'biblionumber'} = $biblionumber;
92
        my $xml = $new_record->as_xml_record();
92
        my $xml = $new_record->as_xml_record();
93
- 

Return to bug 19536