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

(-)a/Koha/Template/Plugin/CirculationRules.pm (-1 / +16 lines)
Lines 22-27 use Modern::Perl; Link Here
22
use base qw( Template::Plugin );
22
use base qw( Template::Plugin );
23
23
24
use Koha::CirculationRules;
24
use Koha::CirculationRules;
25
use C4::Circulation qw( GetRenewCount );
25
26
26
sub Get {
27
sub Get {
27
    my ( $self, $branchcode, $categorycode, $itemtype, $rule_name ) = @_;
28
    my ( $self, $branchcode, $categorycode, $itemtype, $rule_name ) = @_;
Lines 62-65 sub Search { Link Here
62
    return $rule->rule_value if $rule;
63
    return $rule->rule_value if $rule;
63
}
64
}
64
65
66
sub Renewals {
67
    my ( $self, $borrowernumber, $itemnumber ) = @_;
68
69
    my ( $count, $allowed, $remaining, $unseen_count, $unseen_allowed, $unseen_remaining ) = GetRenewCount( $borrowernumber, $itemnumber );
70
71
    return {
72
        count            => $count,
73
        allowed          => $allowed,
74
        remaining        => $remaining,
75
        unseen_count     => $unseen_count,
76
        unseen_allowed   => $unseen_allowed,
77
        unseen_remaining => $unseen_remaining,
78
    };
79
}
80
65
1;
81
1;
66
- 

Return to bug 30901