From ff4958c80656fcca5c31cb291cef2c3866c86b23 Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Date: Wed, 15 Mar 2017 09:30:19 -0300
Subject: [PATCH] Bug 18270: Do not fetch the MARC record when deleting an item
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

$record is never used later, the call is superfluous.

Test plan:
Quick glance at the code should be enough

Signed-off-by: Marc Véron <veron@veron.ch>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
---
 C4/Items.pm | 2 --
 1 file changed, 2 deletions(-)

diff --git a/C4/Items.pm b/C4/Items.pm
index 3b2bee9917..d7b2600c8f 100644
--- a/C4/Items.pm
+++ b/C4/Items.pm
@@ -679,8 +679,6 @@ sub DelItem {
     # FIXME check the item has no current issues
     my $deleted = _koha_delete_item( $itemnumber );
 
-    # get the MARC record
-    my $record = GetMarcBiblio($biblionumber);
     ModZebra( $biblionumber, "specialUpdate", "biblioserver" );
 
     #search item field code
-- 
2.39.5