Lines 81-92
my $effective_caching_method = ref($cache->cache);
Link Here
|
81 |
# FIXME What are the consequences of that?? |
81 |
# FIXME What are the consequences of that?? |
82 |
my $is_memcached_still_active = $cache->set_in_cache('test_for_about_page', "just a simple value"); |
82 |
my $is_memcached_still_active = $cache->set_in_cache('test_for_about_page', "just a simple value"); |
83 |
|
83 |
|
|
|
84 |
my $where_is_memcached_config = 'nowhere'; |
85 |
if ( $ENV{MEMCACHED_SERVERS} and C4::Context->config('memcached_servers') ) { |
86 |
$where_is_memcached_config = 'both'; |
87 |
} elsif ( $ENV{MEMCACHED_SERVERS} and not C4::Context->config('memcached_servers') ) { |
88 |
$where_is_memcached_config = 'ENV_only'; |
89 |
} elsif ( C4::Context->config('memcached_servers') ) { |
90 |
$where_is_memcached_config = 'config_only'; |
91 |
} |
92 |
|
84 |
$template->param( |
93 |
$template->param( |
85 |
effective_caching_method => $effective_caching_method, |
94 |
effective_caching_method => $effective_caching_method, |
86 |
memcached_servers => $memcached_servers, |
95 |
memcached_servers => $memcached_servers, |
87 |
memcached_namespace => $memcached_namespace, |
96 |
memcached_namespace => $memcached_namespace, |
88 |
is_memcached_still_active => $is_memcached_still_active, |
97 |
is_memcached_still_active => $is_memcached_still_active, |
89 |
memcached_running => Koha::Caches->get_instance->memcached_cache |
98 |
where_is_memcached_config => $where_is_memcached_config, |
|
|
99 |
memcached_running => Koha::Caches->get_instance->memcached_cache, |
90 |
); |
100 |
); |
91 |
|
101 |
|
92 |
# Additional system information for warnings |
102 |
# Additional system information for warnings |