From 188219c9e063907f1b74c6edcebe9fa5ab6b8b47 Mon Sep 17 00:00:00 2001 From: LMSCloudPaulD Date: Wed, 14 Dec 2022 11:33:37 +0100 Subject: [PATCH] Add fallback redirect to additem op if \$current_item is undefined https://bugs.koha-community.org/show_bug.cgi?id=32418 --- cataloguing/additem.pl | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/cataloguing/additem.pl b/cataloguing/additem.pl index ed31390663..4c1a015f62 100755 --- a/cataloguing/additem.pl +++ b/cataloguing/additem.pl @@ -462,15 +462,14 @@ if ($op eq "additem") { } elsif ($op eq "edititem") { #------------------------------------------------------------------------------- # retrieve item if exist => then, it's a modif - $current_item = Koha::Items->find($itemnumber)->unblessed; - # FIXME Handle non existent item - $nextop = "saveitem"; + $current_item = Koha::Items->find($itemnumber)->unblessed or undef; + $nextop = $current_item ? "saveitem" : "additem"; #------------------------------------------------------------------------------- } elsif ($op eq "dupeitem") { #------------------------------------------------------------------------------- # retrieve item if exist => then, it's a modif - $current_item = Koha::Items->find($itemnumber)->unblessed; - # FIXME Handle non existent item + $current_item = Koha::Items->find($itemnumber)->unblessed or undef; + if (!$current_item) { $nextop = "additem"; last; } if (C4::Context->preference('autoBarcode') eq 'incremental') { my ( $barcode ) = C4::Barcodes::ValueBuilder::incremental::get_barcode; $current_item->{barcode} = $barcode; -- 2.37.1 (Apple Git-137.1)