*CGI::new = sub {
my $q = $old_new->( @_ );
$CGI::PARAM_UTF8 = 1;
Koha::Cache->flush_L1_if_needed();
Koha::Cache->get_instance->flush_L1_if_needed();
return $q;
};
}
-