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

(-)a/C4/Items.pm (-6 lines)
Lines 649-659 sub DelItem { Link Here
649
    my $record = GetMarcBiblio($biblionumber);
649
    my $record = GetMarcBiblio($biblionumber);
650
    ModZebra( $biblionumber, "specialUpdate", "biblioserver" );
650
    ModZebra( $biblionumber, "specialUpdate", "biblioserver" );
651
651
652
    # backup the record
653
    my $copy2deleted = $dbh->prepare("UPDATE deleteditems SET marc=? WHERE itemnumber=?");
654
    $copy2deleted->execute( $record->as_usmarc(), $itemnumber );
655
    # This last update statement makes that the timestamp column in deleteditems is updated too. If you remove these lines, please add a line to update the timestamp separately. See Bugzilla report 7146 and Biblio.pm (DelBiblio).
656
657
    #search item field code
652
    #search item field code
658
    logaction("CATALOGUING", "DELETE", $itemnumber, "item") if C4::Context->preference("CataloguingLog");
653
    logaction("CATALOGUING", "DELETE", $itemnumber, "item") if C4::Context->preference("CataloguingLog");
659
}
654
}
660
- 

Return to bug 6331