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

(-)a/acqui/addorderiso2709.pl (-7 lines)
Lines 278-289 if ($op eq ""){ Link Here
278
            my @serials      = $input->param('serial');
278
            my @serials      = $input->param('serial');
279
            my @ind_tag   = $input->param('ind_tag');
279
            my @ind_tag   = $input->param('ind_tag');
280
            my @indicator = $input->param('indicator'); #Passing the imaginary empty "  " -indicators from the templates, to stop C4::Biblio::TransformHtmlToXml() to warn the bejesus out of my koha-error.log
280
            my @indicator = $input->param('indicator'); #Passing the imaginary empty "  " -indicators from the templates, to stop C4::Biblio::TransformHtmlToXml() to warn the bejesus out of my koha-error.log
281
            my $item;
282
            push @{ $item->{tags} },         $tags[0];
283
            push @{ $item->{subfields} },    $subfields[0];
284
            push @{ $item->{field_values} }, $field_values[0];
285
            push @{ $item->{ind_tag} },      $ind_tag[0];
286
            push @{ $item->{indicator} },    $indicator[0];
287
            my $xml = TransformHtmlToXml( \@tags, \@subfields, \@field_values, \@indicator, \@ind_tag );
281
            my $xml = TransformHtmlToXml( \@tags, \@subfields, \@field_values, \@indicator, \@ind_tag );
288
            my $record = MARC::Record::new_from_xml( $xml, 'UTF-8' );
282
            my $record = MARC::Record::new_from_xml( $xml, 'UTF-8' );
289
            for (my $qtyloop=1;$qtyloop <= $c_quantity;$qtyloop++) {
283
            for (my $qtyloop=1;$qtyloop <= $c_quantity;$qtyloop++) {
290
- 

Return to bug 13182