|
Lines 8-15
use C4::Branch;
Link Here
|
| 8 |
use C4::Items; |
8 |
use C4::Items; |
| 9 |
use C4::Members; |
9 |
use C4::Members; |
| 10 |
use C4::Reserves; |
10 |
use C4::Reserves; |
|
|
11 |
use Koha::DateUtils; |
| 11 |
|
12 |
|
| 12 |
use Test::More tests => 48; |
13 |
use Test::More tests => 49; |
| 13 |
|
14 |
|
| 14 |
BEGIN { |
15 |
BEGIN { |
| 15 |
use_ok('C4::Circulation'); |
16 |
use_ok('C4::Circulation'); |
|
Lines 359-364
C4::Context->dbh->do("DELETE FROM accountlines");
Link Here
|
| 359 |
); |
360 |
); |
| 360 |
|
361 |
|
| 361 |
ok( $total_due == 15, 'Borrower only charged fine with both WhenLostForgiveFine and WhenLostChargeReplacementFee disabled' ); |
362 |
ok( $total_due == 15, 'Borrower only charged fine with both WhenLostForgiveFine and WhenLostChargeReplacementFee disabled' ); |
|
|
363 |
|
| 364 |
my $now = dt_from_string(); |
| 365 |
my $future = dt_from_string(); |
| 366 |
$future->add( days => 7 ); |
| 367 |
my $units = C4::Overdues::_get_chargeable_units('days', $future, $now, 'MPL'); |
| 368 |
ok( $units == 0, '_get_chargeable_units returns 0 for items not past due date' ); |
| 362 |
} |
369 |
} |
| 363 |
|
370 |
|
| 364 |
{ |
371 |
{ |
| 365 |
- |
|
|