Bug 17600: Standardize our EXPORT_OK

[srvgit] / Koha / Item.pm

diff --git a/Koha/Item.pm b/Koha/Item.pm
index 049b026..c653dc2 100644 (file)
--- a/Koha/Item.pm
+++ b/Koha/Item.pm
@@ -19,18 +19,16 @@ package Koha::Item;
 
 use Modern::Perl;
 
-use Carp;
-use List::MoreUtils qw(any);
-use Data::Dumper;
-use Try::Tiny;
+use List::MoreUtils qw( any );
+use Data::Dumper qw( Dumper );
 
 use Koha::Database;
 use Koha::DateUtils qw( dt_from_string );
 
 use C4::Context;
-use C4::Circulation;
+use C4::Circulation qw( GetBranchItemRule );
 use C4::Reserves;
-use C4::ClassSource; # FIXME We would like to avoid that
+use C4::ClassSource qw( GetClassSort );
 use C4::Log qw( logaction );
 
 use Koha::Checkouts;
@@ -1088,7 +1086,7 @@ sub _set_found_trigger {
 
                     if ( $refund ) {
                         # Revert the forgive credit
-                        $refund->void();
+                        $refund->void({ interface => 'trigger' });
                         $self->{_restored} = 1;
                     }