3 # This file is part of Koha.
5 # Koha is free software; you can redistribute it and/or modify it
6 # under the terms of the GNU General Public License as published by
7 # the Free Software Foundation; either version 3 of the License, or
8 # (at your option) any later version.
10 # Koha is distributed in the hope that it will be useful, but
11 # WITHOUT ANY WARRANTY; without even the implied warranty of
12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 # GNU General Public License for more details.
15 # You should have received a copy of the GNU General Public License
16 # along with Koha; if not, see <http://www.gnu.org/licenses>.
20 Koha::Caches - Cache handling
24 my $cache = Koha::Caches->get_instance();
38 our $singleton_caches;
42 This gets a shared instance of the cache, set up in a very default way. This is
43 the recommended way to fetch a cache object. If possible, it'll be
44 persistent across multiple instances.
49 my ($class, $subnamespace) = @_;
51 $singleton_caches->{$subnamespace} = Koha::Cache->new({}, { subnamespace => $subnamespace } )
52 unless $singleton_caches->{$subnamespace};
53 return $singleton_caches->{$subnamespace};
56 =head2 flush_L1_caches
61 return unless $singleton_caches;
62 for my $cache ( values %$singleton_caches ) {
63 $cache->flush_L1_cache;