From 507ce7618985ba9f88db0c80c1aaf86bff9af9d8 Mon Sep 17 00:00:00 2001 From: Tomas Cohen Arazi Date: Tue, 28 Jun 2016 10:03:16 -0300 Subject: [PATCH] Bug 14642: Log on ::delete --- Koha/Hold.pm | 15 +++++++++++++++ 1 file changed, 15 insertions(+) diff --git a/Koha/Hold.pm b/Koha/Hold.pm index 60a121a..3cc8440 100644 --- a/Koha/Hold.pm +++ b/Koha/Hold.pm @@ -90,6 +90,21 @@ sub resume { return $self; } +=head3 delete + +$hold->delete(); + +=cut + +sub delete { + my ( $self ) = @_; + + logaction( 'HOLDS', 'DELETE', $self->reserve_id, Dumper($self->unblessed) ) + if C4::Context->preference('HoldsLog'); + + return $self->SUPER::delete($self); +} + =head3 waiting_expires_on Returns a DateTime for the date a waiting holds expires on. -- 2.9.0