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

(-)a/Koha/Account/Line.pm (-5 / +4 lines)
Lines 63-73 Return the checkout linked to this account line if exists Link Here
63
sub checkout {
63
sub checkout {
64
    my ( $self ) = @_;
64
    my ( $self ) = @_;
65
    return unless $self->issue_id;
65
    return unless $self->issue_id;
66
    my $issue_rs = $self->_result->issue;
66
    my $checkout_rs = $self->_result->checkout;
67
    return Koha::Checkout->_new_from_dbic( $issue_rs ) if $issue_rs;
67
    return Koha::Checkout->_new_from_dbic( $checkout_rs ) if $checkout_rs;
68
68
69
    my $old_issue_rs = $self->_result->old_issue;
69
    my $old_checkout_rs = $self->_result->old_checkout;
70
    return Koha::Old::Checkout->_new_from_dbic( $old_issue_rs ) if $old_issue_rs;
70
    return Koha::Old::Checkout->_new_from_dbic( $old_checkout_rs ) if $old_checkout_rs;
71
    return;
71
    return;
72
}
72
}
73
73
74
- 

Return to bug 22683