|
Lines 7-13
use Koha::DateUtils;
Link Here
|
| 7 |
use Koha::IssuingRules; |
7 |
use Koha::IssuingRules; |
| 8 |
use Koha::Library; |
8 |
use Koha::Library; |
| 9 |
|
9 |
|
| 10 |
use Test::More tests => 10; |
10 |
use Test::More tests => 9; |
| 11 |
|
11 |
|
| 12 |
BEGIN { |
12 |
BEGIN { |
| 13 |
use_ok('C4::Circulation'); |
13 |
use_ok('C4::Circulation'); |
|
Lines 148-154
my $sampleissuingrule1 = {
Link Here
|
| 148 |
no_auto_renewal_after_hard_limit => undef, |
148 |
no_auto_renewal_after_hard_limit => undef, |
| 149 |
suspension_chargeperiod => 1, |
149 |
suspension_chargeperiod => 1, |
| 150 |
holds_per_day => undef, |
150 |
holds_per_day => undef, |
| 151 |
note => undef, |
|
|
| 152 |
}; |
151 |
}; |
| 153 |
my $sampleissuingrule2 = { |
152 |
my $sampleissuingrule2 = { |
| 154 |
branchcode => $samplebranch2->{branchcode}, |
153 |
branchcode => $samplebranch2->{branchcode}, |
|
Lines 347-358
$sth->execute(
Link Here
|
| 347 |
$sampleissuingrule3->{article_requests}, |
346 |
$sampleissuingrule3->{article_requests}, |
| 348 |
); |
347 |
); |
| 349 |
|
348 |
|
| 350 |
is_deeply( |
|
|
| 351 |
Koha::IssuingRules->find({ categorycode => $samplecat->{categorycode}, itemtype => 'Book', branchcode => $samplebranch1->{branchcode} })->unblessed, |
| 352 |
$sampleissuingrule1, |
| 353 |
"GetIssuingCharge returns issuingrule1's informations" |
| 354 |
); |
| 355 |
|
| 356 |
#Test GetLoanLength |
349 |
#Test GetLoanLength |
| 357 |
is_deeply( |
350 |
is_deeply( |
| 358 |
C4::Circulation::GetLoanLength( |
351 |
C4::Circulation::GetLoanLength( |
| 359 |
- |
|
|