Lines 56-64
use Koha::ActionLogs;
Link Here
|
56 |
use Koha::Notice::Messages; |
56 |
use Koha::Notice::Messages; |
57 |
use Koha::Cache::Memory::Lite; |
57 |
use Koha::Cache::Memory::Lite; |
58 |
|
58 |
|
|
|
59 |
my $builder = t::lib::TestBuilder->new; |
59 |
sub set_userenv { |
60 |
sub set_userenv { |
60 |
my ( $library ) = @_; |
61 |
my ( $library ) = @_; |
61 |
t::lib::Mocks::mock_userenv({ branchcode => $library->{branchcode} }); |
62 |
my $staff = $builder->build_object({ class => "Koha::Patrons" }); |
|
|
63 |
t::lib::Mocks::mock_userenv({ patron => $staff, branchcode => $library->{branchcode} }); |
62 |
} |
64 |
} |
63 |
|
65 |
|
64 |
sub str { |
66 |
sub str { |
Lines 105-111
sub test_debarment_on_checkout {
Link Here
|
105 |
|
107 |
|
106 |
my $schema = Koha::Database->schema; |
108 |
my $schema = Koha::Database->schema; |
107 |
$schema->storage->txn_begin; |
109 |
$schema->storage->txn_begin; |
108 |
my $builder = t::lib::TestBuilder->new; |
|
|
109 |
my $dbh = C4::Context->dbh; |
110 |
my $dbh = C4::Context->dbh; |
110 |
|
111 |
|
111 |
# Prevent random failures by mocking ->now |
112 |
# Prevent random failures by mocking ->now |
Lines 712-717
subtest "CanBookBeRenewed tests" => sub {
Link Here
|
712 |
# Make sure fine calculation isn't skipped when adding renewal |
713 |
# Make sure fine calculation isn't skipped when adding renewal |
713 |
t::lib::Mocks::mock_preference('CalculateFinesOnReturn', 1); |
714 |
t::lib::Mocks::mock_preference('CalculateFinesOnReturn', 1); |
714 |
|
715 |
|
|
|
716 |
my $staff = $builder->build_object({ class => "Koha::Patrons" }); |
717 |
t::lib::Mocks::mock_userenv({ patron => $staff }); |
718 |
|
715 |
t::lib::Mocks::mock_preference('RenewalLog', 0); |
719 |
t::lib::Mocks::mock_preference('RenewalLog', 0); |
716 |
my $date = output_pref( { dt => dt_from_string(), dateonly => 1, dateformat => 'iso' } ); |
720 |
my $date = output_pref( { dt => dt_from_string(), dateonly => 1, dateformat => 'iso' } ); |
717 |
my %params_renewal = ( |
721 |
my %params_renewal = ( |
Lines 3940-3965
subtest 'ItemsDeniedRenewal preference' => sub {
Link Here
|
3940 |
} |
3944 |
} |
3941 |
}); |
3945 |
}); |
3942 |
my $future = dt_from_string->add( days => 1 ); |
3946 |
my $future = dt_from_string->add( days => 1 ); |
3943 |
my $deny_issue = $builder->build_object({ class => 'Koha::Checkouts', value => { |
3947 |
my $deny_issue = $builder->build_object( |
3944 |
returndate => undef, |
3948 |
{ |
3945 |
renewals => 0, |
3949 |
class => 'Koha::Checkouts', |
3946 |
auto_renew => 0, |
3950 |
value => { |
3947 |
borrowernumber => $idr_borrower->borrowernumber, |
3951 |
returndate => undef, |
3948 |
itemnumber => $deny_book->itemnumber, |
3952 |
renewals_count => 0, |
3949 |
onsite_checkout => 0, |
3953 |
auto_renew => 0, |
3950 |
date_due => $future, |
3954 |
borrowernumber => $idr_borrower->borrowernumber, |
|
|
3955 |
itemnumber => $deny_book->itemnumber, |
3956 |
onsite_checkout => 0, |
3957 |
date_due => $future, |
3958 |
} |
3951 |
} |
3959 |
} |
3952 |
}); |
3960 |
); |
3953 |
my $allow_issue = $builder->build_object({ class => 'Koha::Checkouts', value => { |
3961 |
my $allow_issue = $builder->build_object( |
3954 |
returndate => undef, |
3962 |
{ |
3955 |
renewals => 0, |
3963 |
class => 'Koha::Checkouts', |
3956 |
auto_renew => 0, |
3964 |
value => { |
3957 |
borrowernumber => $idr_borrower->borrowernumber, |
3965 |
returndate => undef, |
3958 |
itemnumber => $allow_book->itemnumber, |
3966 |
renewals_count => 0, |
3959 |
onsite_checkout => 0, |
3967 |
auto_renew => 0, |
3960 |
date_due => $future, |
3968 |
borrowernumber => $idr_borrower->borrowernumber, |
|
|
3969 |
itemnumber => $allow_book->itemnumber, |
3970 |
onsite_checkout => 0, |
3971 |
date_due => $future, |
3972 |
} |
3961 |
} |
3973 |
} |
3962 |
}); |
3974 |
); |
3963 |
|
3975 |
|
3964 |
my $idr_rules; |
3976 |
my $idr_rules; |
3965 |
|
3977 |
|