@@ -, +, @@ article_requests_current ->article_requests->filter_by_current. $ kshell k$ prove t/db_dependent/Koha/Patron.t --- Koha/Patron.pm | 28 ------ .../en/includes/patron-article-requests.inc | 6 +- .../prog/en/modules/circ/circulation.tt | 4 +- .../prog/en/modules/members/moremember.tt | 4 +- .../bootstrap/en/modules/opac-user.tt | 2 +- opac/opac-user.pl | 2 +- t/db_dependent/Koha/Patron.t | 86 +------------------ 7 files changed, 13 insertions(+), 119 deletions(-) --- a/Koha/Patron.pm +++ a/Koha/Patron.pm @@ -1015,34 +1015,6 @@ sub article_requests { return Koha::ArticleRequests->_new_from_dbic( scalar $self->_result->article_requests ); } -=head3 article_requests_current - - my $current_article_requests = $patron->article_requests_current - -Returns the article requests associated with this patron that are incomplete - -=cut - -sub article_requests_current { - my ( $self ) = @_; - - return $self->article_requests->filter_by_current; -} - -=head3 article_requests_finished - - my $finished_article_requests = $biblio->article_requests_finished - -Returns the article requests associated with this patron that are completed - -=cut - -sub article_requests_finished { - my ( $self ) = @_; - - return $self->article_requests->filter_by_finished; -} - =head3 add_enrolment_fee_if_needed my $enrolment_fee = $patron->add_enrolment_fee_if_needed($renewal); --- a/koha-tmpl/intranet-tmpl/prog/en/includes/patron-article-requests.inc +++ a/koha-tmpl/intranet-tmpl/prog/en/includes/patron-article-requests.inc @@ -1,5 +1,7 @@ +[% USE Context %] +[% SET current_article_requests = Context.Scalar( Context.Scalar( patron, 'article_requests' ), 'filter_by_current' ) %]