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