[Koha-patches] [PATCH] Starting work on memoizing expensive functions with Memoize::Memcached

[Chris Cormack]

A patch will follow with the changes to the koha-conf.xml and with instructions on installing memcached
---
 C4/Languages.pm |   12 ++++++++++++
 1 files changed, 12 insertions(+), 0 deletions(-)

diff --git a/C4/Languages.pm b/C4/Languages.pm
index a082b1f..6bb9146 100644
--- a/C4/Languages.pm
+++ b/C4/Languages.pm
@@ -25,6 +25,18 @@ use Carp;
 use C4::Context;
 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $DEBUG);
 
+
+use Memoize::Memcached
+      memcached => {
+        servers    => [ C4::Context->config('memcached_servers') ],
+        key_prefix => C4::Context->config('memcached_namespace'),
+      };
+
+memoize_memcached('getTranslatedLanguages', expire_time => 600); #cache for 10 minutes
+memoize_memcached('getFrameworkLanguages' , expire_time => 600);
+memoize_memcached('getAllLanguages',        expire_time => 600);
+
+
 BEGIN {
     $VERSION = 3.00;
     require Exporter;
-- 
1.6.0.4