|
Lines 90-95
sub issuer {
Link Here
|
| 90 |
return Koha::Patron->_new_from_dbic( $issuer_rs ); |
90 |
return Koha::Patron->_new_from_dbic( $issuer_rs ); |
| 91 |
} |
91 |
} |
| 92 |
|
92 |
|
|
|
93 |
=head3 renewals |
| 94 |
|
| 95 |
my $renewals = $checkout->renewals; |
| 96 |
|
| 97 |
Return a Koha::Checkouts::Renewals set attached to this checkout |
| 98 |
|
| 99 |
=cut |
| 100 |
|
| 101 |
sub renewals { |
| 102 |
my ( $self ) = @_; |
| 103 |
my $renewals_rs = $self->_result->renewals; |
| 104 |
return unless $renewals_rs; |
| 105 |
return Koha::Checkouts::Renewals->_new_from_dbic( $renewals_rs ); |
| 106 |
} |
| 107 |
|
| 93 |
=head3 anonymize |
108 |
=head3 anonymize |
| 94 |
|
109 |
|
| 95 |
$checkout->anonymize(); |
110 |
$checkout->anonymize(); |