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

(-)a/C4/Biblio.pm (-1 / +8 lines)
Lines 326-331 sub ModBiblio { Link Here
326
        $record->append_fields($field);
326
        $record->append_fields($field);
327
    }
327
    }
328
328
329
    foreach my $field ($record->fields()) {
330
        if (! $field->is_control_field()) {
331
            if (scalar($field->subfields()) == 0) {
332
                $record->delete_fields($field);
333
            }
334
        }
335
    }
336
329
    # update biblionumber and biblioitemnumber in MARC
337
    # update biblionumber and biblioitemnumber in MARC
330
    # FIXME - this is assuming a 1 to 1 relationship between
338
    # FIXME - this is assuming a 1 to 1 relationship between
331
    # biblios and biblioitems
339
    # biblios and biblioitems
332
- 

Return to bug 5683