Bug 18501: Auto refund if mark as found from cataloguing

[koha.git] / cataloguing / additem.pl

diff --git a/cataloguing/additem.pl b/cataloguing/additem.pl
index bbdedf6..9e15c43 100755 (executable)
--- a/cataloguing/additem.pl
+++ b/cataloguing/additem.pl
@@ -749,8 +749,11 @@ if ($op eq "additem") {
         $itemnumber = q{};
         my $olditemlost = $item->itemlost;
         my $newitemlost = $newitem->{itemlost};
-        LostItem( $item->itemnumber, 'additem' )
-            if $newitemlost && $newitemlost ge '1' && !$olditemlost;
+        if ( $newitemlost && $newitemlost ge '1' && !$olditemlost ) {
+            LostItem( $item->itemnumber, 'additem' )
+        } elsif ( !$newitemlost && $olditemlost && $olditemlost ge '1' ) {
+            $item->set_found;
+        }
     }
     $nextop="additem";
 } elsif ($op eq "delinkitem"){