|
Lines 36-41
use C4::Installer;
Link Here
|
| 36 |
use Koha; |
36 |
use Koha; |
| 37 |
use Koha::Acquisition::Currencies; |
37 |
use Koha::Acquisition::Currencies; |
| 38 |
use Koha::Patrons; |
38 |
use Koha::Patrons; |
|
|
39 |
use Koha::Caches; |
| 39 |
use Koha::Config::SysPrefs; |
40 |
use Koha::Config::SysPrefs; |
| 40 |
use C4::Members::Statistics; |
41 |
use C4::Members::Statistics; |
| 41 |
|
42 |
|
|
Lines 71-85
if ( any { /(^psgi\.|^plack\.)/i } keys %ENV ) {
Link Here
|
| 71 |
} |
72 |
} |
| 72 |
|
73 |
|
| 73 |
# Memcached configuration |
74 |
# Memcached configuration |
|
|
75 |
my $memcached_servers = $ENV{MEMCACHED_SERVERS} // C4::Context->config('memcached_servers'); |
| 76 |
my $memcached_namespace = $ENV{MEMCACHED_NAMESPACE} // C4::Context->config('memcached_namespace'); |
| 74 |
|
77 |
|
| 75 |
my $memcached_servers = $ENV{ MEMCACHED_SERVERS }; |
78 |
my $effective_caching_method = ref(Koha::Caches->get_instance->cache); |
| 76 |
my $memcached_namespace = $ENV{ MEMCACHED_NAMESPACE }; |
|
|
| 77 |
my $memcached_running = C4::Context->ismemcached; |
| 78 |
|
79 |
|
| 79 |
$template->param( |
80 |
$template->param( |
| 80 |
memcached_servers => $ENV{ MEMCACHED_SERVERS }, |
81 |
effective_caching_method => $effective_caching_method, |
| 81 |
memcached_namespace => $ENV{ MEMCACHED_NAMESPACE }, |
82 |
memcached_servers => $memcached_servers, |
| 82 |
memcached_running => C4::Context->ismemcached |
83 |
memcached_namespace => $memcached_namespace, |
|
|
84 |
memcached_running => Koha::Caches->get_instance->memcached_cache |
| 83 |
); |
85 |
); |
| 84 |
|
86 |
|
| 85 |
# Additional system information for warnings |
87 |
# Additional system information for warnings |