View | Details | Raw Unified | Return to bug 18232
Collapse All | Expand All

(-)a/Koha/Caches.pm (-1 / +17 lines)
Lines 64-67 sub flush_L1_caches { Link Here
64
    }
64
    }
65
}
65
}
66
66
67
=head2
68
69
    Koha::Caches::flush();
70
71
Flushes all known L1 and L2 caches
72
73
=cut
74
75
sub flush {
76
    return unless $singleton_caches;
77
    for my $k ( keys %$singleton_caches ) {
78
        my $cache = $singleton_caches->{$k};
79
        $cache->flush_all();
80
        delete $singleton_caches->{$k};
81
    }
82
}
83
67
1;
84
1;
68
- 

Return to bug 18232