@@ -, +, @@ --- Koha/Z3950Responder.pm | 4 ++++ 1 file changed, 4 insertions(+) --- a/Koha/Z3950Responder.pm +++ a/Koha/Z3950Responder.pm @@ -24,6 +24,8 @@ use Modern::Perl; use C4::Biblio qw( GetMarcFromKohaField ); use C4::Koha qw( GetAuthorisedValues ); +use Koha::Caches; + use Net::Z3950::SimpleServer; =head1 NAME @@ -180,6 +182,8 @@ Callback that is called when a new search is performed sub search_handler { my ( $self, $args ) = @_; + # Flushing L1 to make sure the search will be processed using the correct data + Koha::Caches->flush_L1_caches(); $args->{HANDLE}->search_handler($args); } --