From d2a8cb10cd56ac97ad674e6056336aa65ef97aae Mon Sep 17 00:00:00 2001
From: Jesse Weaver <jweaver@bywatersolutions.com>
Date: Wed, 16 Mar 2016 17:12:15 -0600
Subject: [PATCH] Bug 16140: don't clone cache results for framework/authvals

This is needed so as not to cancel out the performance gains of the L1
cache.
---
 C4/Biblio.pm | 2 +-
 C4/Koha.pm   | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/C4/Biblio.pm b/C4/Biblio.pm
index a59b1b7..462a8e2 100644
--- a/C4/Biblio.pm
+++ b/C4/Biblio.pm
@@ -1124,7 +1124,7 @@ sub GetMarcStructure {
     $forlibrarian = $forlibrarian ? 1 : 0;
     my $cache = Koha::Cache->get_instance();
     my $cache_key = "MarcStructure-$forlibrarian-$frameworkcode";
-    my $cached = $cache->get_from_cache($cache_key);
+    my $cached = $cache->get_from_cache( $cache_key, { unsafe => 1 } );
     return $cached if $cached;
 
     my $dbh = C4::Context->dbh;
diff --git a/C4/Koha.pm b/C4/Koha.pm
index b6a6b34..1e1fd74 100644
--- a/C4/Koha.pm
+++ b/C4/Koha.pm
@@ -1025,7 +1025,7 @@ sub GetAuthorisedValues {
     my $cache_key =
       "AuthorisedValues-$category-$opac-$branch_limit";
     my $cache  = Koha::Cache->get_instance();
-    my $result = $cache->get_from_cache($cache_key);
+    my $result = $cache->get_from_cache($cache_key, { unsafe => 1 } );
     if ($result) {
         _AddSelectedAuthVal( $result, $selected ) if defined $selected;
         return $result;
-- 
2.8.0.rc3