Bug 23463: Remove DelItemCheck and ItemSafeToDelete

[koha.git] / tools / batchMod.pl

diff --git a/tools/batchMod.pl b/tools/batchMod.pl
index f9fb0a5..eedf9b8 100755 (executable)
--- a/tools/batchMod.pl
+++ b/tools/batchMod.pl
@@ -186,11 +186,11 @@ if ($op eq "action") {
        foreach my $itemnumber(@itemnumbers){
 
                $job->progress($i) if $runinbackground;
-        my $itemdata = Koha::Items->find($itemnumber);
-        next unless $itemdata; # Should have been tested earlier, but just in case...
-        $itemdata = $itemdata->unblessed;
+        my $item = Koha::Items->find($itemnumber);
+        next unless $item; # Should have been tested earlier, but just in case...
+        my $itemdata = $item->unblessed;
         if ( $del ){
-            my $return = DelItemCheck( $itemdata->{'biblionumber'}, $itemdata->{'itemnumber'});
+            my $return = $item->safe_delete;
                        if ($return == 1) {
                            $deleted_items++;
                        } else {