Lines 675-681
if ($op eq "additem") {
Link Here
|
675 |
# check that there is no issue on this item before deletion. |
675 |
# check that there is no issue on this item before deletion. |
676 |
my $item = Koha::Items->find($itemnumber); |
676 |
my $item = Koha::Items->find($itemnumber); |
677 |
$error = $item->safe_delete; |
677 |
$error = $item->safe_delete; |
678 |
if($error ne '1'){ |
678 |
if(ref($error) eq 'Koha::Item'){ |
679 |
print $input->redirect("additem.pl?biblionumber=$biblionumber&frameworkcode=$frameworkcode&searchid=$searchid"); |
679 |
print $input->redirect("additem.pl?biblionumber=$biblionumber&frameworkcode=$frameworkcode&searchid=$searchid"); |
680 |
}else{ |
680 |
}else{ |
681 |
push @errors,$error; |
681 |
push @errors,$error; |
682 |
- |
|
|