memoize GetBranches

diff --git a/C4/Branch.pm b/C4/Branch.pm
index 2beac98..58f7342 100644 (file)
--- a/C4/Branch.pm
+++ b/C4/Branch.pm
@@ -50,6 +50,9 @@ BEGIN {
        @EXPORT_OK = qw( &onlymine &mybranch get_branch_code_from_name );
 }
 
+use Memoize;
+memoize 'GetBranches';
+
 =head1 NAME
 
 C4::Branch - Koha branch module