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

(-)a/C4/Biblio.pm (-3 / +1 lines)
Lines 1274-1281 sub GetMarcBiblio { Link Here
1274
    return unless $marcxml;
1274
    return unless $marcxml;
1275
1275
1276
    MARC::File::XML->default_record_format( C4::Context->preference('marcflavour') );
1276
    MARC::File::XML->default_record_format( C4::Context->preference('marcflavour') );
1277
    my $record = MARC::Record->new();
1277
    my $record = eval { MARC::Record::new_from_xml( $marcxml, "utf8", C4::Context->preference('marcflavour') ) };
1278
    $record = eval { MARC::Record::new_from_xml( $marcxml, "utf8", C4::Context->preference('marcflavour') ) };
1279
    if ($@) { warn " problem with :$biblionumber : $@ \n$marcxml"; }
1278
    if ($@) { warn " problem with :$biblionumber : $@ \n$marcxml"; }
1280
    return unless $record;
1279
    return unless $record;
1281
1280
1282
- 

Return to bug 7933