|
Lines 1858-1863
Returns whether the item is a bundle or not
Link Here
|
| 1858 |
|
1858 |
|
| 1859 |
sub is_bundle { |
1859 |
sub is_bundle { |
| 1860 |
my ($self) = @_; |
1860 |
my ($self) = @_; |
|
|
1861 |
# Since this is a performance critical method |
| 1862 |
# and $self->bundle_items->count is rather slow |
| 1863 |
# replace with equivalent DBI query instead |
| 1861 |
my $memory_cache = Koha::Cache::Memory::Lite->get_instance; |
1864 |
my $memory_cache = Koha::Cache::Memory::Lite->get_instance; |
| 1862 |
my $cache_key = 'Koha::Item:is_bundle_dbi_sth'; |
1865 |
my $cache_key = 'Koha::Item:is_bundle_dbi_sth'; |
| 1863 |
my $sth = $memory_cache->get_from_cache($cache_key); |
1866 |
my $sth = $memory_cache->get_from_cache($cache_key); |
| 1864 |
- |
|
|