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

(-)a/C4/Overdues.pm (-5 / +6 lines)
Lines 227-237 sub CalcFine { Link Here
227
    my @fines = grep { defined $_ } Koha::Plugins->call(
227
    my @fines = grep { defined $_ } Koha::Plugins->call(
228
        'overwrite_calc_fine',
228
        'overwrite_calc_fine',
229
        {
229
        {
230
            itemnumber   => $item->{itemnumber},
230
            itemnumber     => $item->{itemnumber},
231
            categorycode => $bortype,
231
            borrowernumber => $item->{borrowernumber},
232
            branchcode   => $branchcode,
232
            categorycode   => $bortype,
233
            due_date     => $due_dt,
233
            branchcode     => $branchcode,
234
            end_date     => $end_date,
234
            due_date       => $due_dt,
235
            end_date       => $end_date,
235
        }
236
        }
236
    );
237
    );
237
238
(-)a/t/db_dependent/Koha/Plugins/Overdues.t (-1 / +7 lines)
Lines 54-59 subtest 'overwrite_calc_fine hook tests' => sub { Link Here
54
    my $library  = $builder->build_object( { class => 'Koha::Libraries', } );
54
    my $library  = $builder->build_object( { class => 'Koha::Libraries', } );
55
    my $category = $builder->build_object( { class => 'Koha::Patron::Categories', } );
55
    my $category = $builder->build_object( { class => 'Koha::Patron::Categories', } );
56
    my $item     = $builder->build_sample_item;
56
    my $item     = $builder->build_sample_item;
57
    my $patron   = $builder->build_object( { class => 'Koha::Patrons', } );
57
58
58
    Koha::Plugins->new->InstallPlugins();
59
    Koha::Plugins->new->InstallPlugins();
59
    my $test_plugin = Koha::Plugin::Test->new->disable();
60
    my $test_plugin = Koha::Plugin::Test->new->disable();
Lines 129-141 subtest 'overwrite_calc_fine hook tests' => sub { Link Here
129
    $empty_value_plugin->disable();
130
    $empty_value_plugin->disable();
130
    $bad_value_plugin->disable();
131
    $bad_value_plugin->disable();
131
132
133
    my $borrowernumber = $patron->borrowernumber;
134
    my $overdue        = $item->unblessed;
135
    $overdue->{borrowernumber} = $borrowernumber;
136
132
    my $itemnumber   = $item->itemnumber;
137
    my $itemnumber   = $item->itemnumber;
133
    my $branchcode   = $library->branchcode;
138
    my $branchcode   = $library->branchcode;
134
    my $categorycode = $category->categorycode;
139
    my $categorycode = $category->categorycode;
135
140
136
    warnings_like { CalcFine( $item->unblessed, $category->categorycode, $library->branchcode, $due_date, $end_date ); }
141
    warnings_like { CalcFine( $overdue, $category->categorycode, $library->branchcode, $due_date, $end_date ); }
137
    [
142
    [
138
        qr/itemnumber:$itemnumber/,
143
        qr/itemnumber:$itemnumber/,
144
        qr/borrowernumber:$borrowernumber/,
139
        qr/branchcode:$branchcode/,
145
        qr/branchcode:$branchcode/,
140
        qr/categorycode:$categorycode/,
146
        qr/categorycode:$categorycode/,
141
        qr/due_date_type:DateTime/,
147
        qr/due_date_type:DateTime/,
(-)a/t/lib/plugins/Koha/Plugin/Test.pm (-1 / +1 lines)
Lines 452-457 sub overwrite_calc_fine { Link Here
452
    my ( $self, $params ) = @_;
452
    my ( $self, $params ) = @_;
453
453
454
    warn "itemnumber:" . $params->{itemnumber};
454
    warn "itemnumber:" . $params->{itemnumber};
455
    warn "borrowernumber:" . $params->{borrowernumber};
455
    warn "branchcode:" . $params->{branchcode};
456
    warn "branchcode:" . $params->{branchcode};
456
    warn "categorycode:" . $params->{categorycode};
457
    warn "categorycode:" . $params->{categorycode};
457
    warn "due_date_type:" . ref( $params->{due_date} );
458
    warn "due_date_type:" . ref( $params->{due_date} );
458
- 

Return to bug 39405