Lines 1621-1635
Returns the items associated with this bundle
Link Here
|
1621 |
sub bundle_items { |
1621 |
sub bundle_items { |
1622 |
my ($self) = @_; |
1622 |
my ($self) = @_; |
1623 |
|
1623 |
|
1624 |
if ( !$self->{_bundle_items_cached} ) { |
1624 |
my $rs = $self->_result->bundle_items; |
1625 |
my $bundle_items = Koha::Items->search( |
1625 |
return Koha::Items->_new_from_dbic($rs); |
1626 |
{ 'item_bundles_item.host' => $self->itemnumber }, |
|
|
1627 |
{ join => 'item_bundles_item' } ); |
1628 |
$self->{_bundle_items} = $bundle_items; |
1629 |
$self->{_bundle_items_cached} = 1; |
1630 |
} |
1631 |
|
1632 |
return $self->{_bundle_items}; |
1633 |
} |
1626 |
} |
1634 |
|
1627 |
|
1635 |
=head3 is_bundle |
1628 |
=head3 is_bundle |