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

(-)a/C4/Biblio.pm (-1 / +1 lines)
Lines 2546-2551 sub TransformHtmlToMarc { Link Here
2546
2546
2547
    # creating a new record
2547
    # creating a new record
2548
    my $record = MARC::Record->new();
2548
    my $record = MARC::Record->new();
2549
    $record->encoding( 'UTF-8' );
2549
    my @fields;
2550
    my @fields;
2550
    my ($biblionumbertagfield, $biblionumbertagsubfield) = (-1, -1);
2551
    my ($biblionumbertagfield, $biblionumbertagsubfield) = (-1, -1);
2551
    ($biblionumbertagfield, $biblionumbertagsubfield) =
2552
    ($biblionumbertagfield, $biblionumbertagsubfield) =
2552
- 

Return to bug 16370