|
Lines 17-23
Link Here
|
| 17 |
|
17 |
|
| 18 |
use Modern::Perl; |
18 |
use Modern::Perl; |
| 19 |
|
19 |
|
| 20 |
use Test::More tests => 39; |
20 |
use Test::More tests => 40; |
| 21 |
use Test::Warn; |
21 |
use Test::Warn; |
| 22 |
|
22 |
|
| 23 |
my $destructorcount = 0; |
23 |
my $destructorcount = 0; |
|
Lines 34-40
SKIP: {
Link Here
|
| 34 |
$ENV{ MEMCACHED_NAMESPACE } = 'unit_tests'; |
34 |
$ENV{ MEMCACHED_NAMESPACE } = 'unit_tests'; |
| 35 |
my $cache = Koha::Cache->get_instance(); |
35 |
my $cache = Koha::Cache->get_instance(); |
| 36 |
|
36 |
|
| 37 |
skip "Cache not enabled", 35 |
37 |
skip "Cache not enabled", 36 |
| 38 |
unless ( $cache->is_cache_active() && defined $cache ); |
38 |
unless ( $cache->is_cache_active() && defined $cache ); |
| 39 |
|
39 |
|
| 40 |
# test fetching an item that isnt in the cache |
40 |
# test fetching an item that isnt in the cache |
| 41 |
- |
|
|