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

(-)a/C4/Items.pm (-6 lines)
Lines 622-632 sub DelItem { Link Here
622
    my $record = GetMarcBiblio($biblionumber);
622
    my $record = GetMarcBiblio($biblionumber);
623
    ModZebra( $biblionumber, "specialUpdate", "biblioserver" );
623
    ModZebra( $biblionumber, "specialUpdate", "biblioserver" );
624
624
625
    # backup the record
626
    my $copy2deleted = $dbh->prepare("UPDATE deleteditems SET marc=? WHERE itemnumber=?");
627
    $copy2deleted->execute( $record->as_usmarc(), $itemnumber );
628
    # 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).
629
630
    #search item field code
625
    #search item field code
631
    logaction("CATALOGUING", "DELETE", $itemnumber, "item") if C4::Context->preference("CataloguingLog");
626
    logaction("CATALOGUING", "DELETE", $itemnumber, "item") if C4::Context->preference("CataloguingLog");
632
}
627
}
633
- 

Return to bug 6331