Bug 11998: Clear L1 cache from psgi files

Signed-off-by: Tomas Cohen Arazi <tomascohen@unc.edu.ar>
Signed-off-by: Jacek Ablewicz <abl@biblos.pk.edu.pl>
Signed-off-by: Brendan Gallagher brendan@bywatersolutions.com

diff --git a/debian/templates/plack.psgi b/debian/templates/plack.psgi
index 559e598..b6bd67f 100644 (file)
--- a/debian/templates/plack.psgi
+++ b/debian/templates/plack.psgi
@@ -44,6 +44,7 @@ use CGI qw(-utf8 ); # we will loose -utf8 under plack, otherwise
     *CGI::new = sub {
         my $q = $old_new->( @_ );
         $CGI::PARAM_UTF8 = 1;
+        C4::Context->clear_syspref_L1_cache();
         return $q;
     };
 }

diff --git a/misc/plack/koha.psgi b/misc/plack/koha.psgi
index 89dbb65..947bb02 100644 (file)
--- a/misc/plack/koha.psgi
+++ b/misc/plack/koha.psgi
@@ -12,6 +12,7 @@ use CGI qw(-utf8 ); # we will loose -utf8 under plack
     *CGI::new = sub {
         my $q = $old_new->( @_ );
         $CGI::PARAM_UTF8 = 1;
+        C4::Context->clear_syspref_L1_cache();
         return $q;
     };
 }