Bug 14919: Add Koha::Patron->old_holds subroutine

Test plan:
Run t/db_dependent/Koha/Patrons.t

Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>

Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
This commit is contained in:
Josef Moravec 2017-10-06 08:04:34 +00:00 committed by Jonathan Druart
parent d4a97bb5ae
commit 9a0853ef67

View file

@ -593,6 +593,20 @@ sub holds {
return Koha::Holds->_new_from_dbic($holds_rs);
}
=head3 old_holds
my $old_holds = $patron->old_holds
Returnn all the historical holds for this patron
=cut
sub old_holds {
my ($self) = @_;
my $old_holds_rs = $self->_result->old_reserves->search( {}, { order_by => 'reservedate' } );
return Koha::Old::Holds->_new_from_dbic($old_holds_rs);
}
=head3 first_valid_email_address
=cut