|
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 |