View | Details | Raw Unified | Return to bug 26232
Collapse All | Expand All

(-)a/t/db_dependent/Circulation.t (-2 / +33 lines)
Lines 2103-2109 subtest 'AddReturn + CumulativeRestrictionPeriods' => sub { Link Here
2103
};
2103
};
2104
2104
2105
subtest 'AddReturn + suspension_chargeperiod' => sub {
2105
subtest 'AddReturn + suspension_chargeperiod' => sub {
2106
    plan tests => 24;
2106
    plan tests => 27;
2107
2107
2108
    my $library = $builder->build( { source => 'Branch' } );
2108
    my $library = $builder->build( { source => 'Branch' } );
2109
    my $patron  = $builder->build( { source => 'Borrower', value => { categorycode => $patron_category->{categorycode} } } );
2109
    my $patron  = $builder->build( { source => 'Borrower', value => { categorycode => $patron_category->{categorycode} } } );
Lines 2152-2157 subtest 'AddReturn + suspension_chargeperiod' => sub { Link Here
2152
        }
2152
        }
2153
    );
2153
    );
2154
2154
2155
    # Same with undef firstremind
2156
    Koha::CirculationRules->search->delete;
2157
    Koha::CirculationRules->set_rules(
2158
        {
2159
            categorycode => '*',
2160
            itemtype     => '*',
2161
            branchcode   => '*',
2162
            rules        => {
2163
                issuelength => 1,
2164
                firstremind => undef,    # 0 day of grace
2165
                finedays    => 2,    # 2 days of fine per day of overdue
2166
                suspension_chargeperiod => 1,
2167
                lengthunit              => 'days',
2168
            }
2169
        }
2170
    );
2171
    {
2172
    my $now = dt_from_string;
2173
    my $five_days_ago = $now->clone->subtract( days => 5 );
2174
    # We want to charge 2 days every day, without grace
2175
    # With 5 days of overdue: 5 * Z
2176
    my $expected_expiration = $now->clone->add( days => ( 5 * 2 ) / 1 );
2177
    test_debarment_on_checkout(
2178
        {
2179
            item            => $item_1,
2180
            library         => $library,
2181
            patron          => $patron,
2182
            due_date        => $five_days_ago,
2183
            expiration_date => $expected_expiration,
2184
        }
2185
    );
2186
    }
2155
    # We want to charge 2 days every 2 days, without grace
2187
    # We want to charge 2 days every 2 days, without grace
2156
    # With 5 days of overdue: (5 * 2) / 2
2188
    # With 5 days of overdue: (5 * 2) / 2
2157
    Koha::CirculationRules->set_rule(
2189
    Koha::CirculationRules->set_rule(
2158
- 

Return to bug 26232