From 2b4ed83466ddf54f6d7e77088dc7e755f9259e91 Mon Sep 17 00:00:00 2001
From: Matthew Somerville <matthew-github@dracos.co.uk>
Date: Fri, 18 Aug 2017 21:12:15 +0100
Subject: Use a schema cache to remember body lookups.

---
 perllib/FixMyStreet/DB/Schema.pm | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'perllib/FixMyStreet/DB/Schema.pm')

diff --git a/perllib/FixMyStreet/DB/Schema.pm b/perllib/FixMyStreet/DB/Schema.pm
index 45d731c33..10bbd434f 100644
--- a/perllib/FixMyStreet/DB/Schema.pm
+++ b/perllib/FixMyStreet/DB/Schema.pm
@@ -25,4 +25,6 @@ __PACKAGE__->connection(FixMyStreet->dbic_connect_info);
 
 has lang => ( is => 'rw' );
 
+has cache => ( is => 'rw', lazy => 1, default => sub { {} } );
+
 1;
-- 
cgit v1.2.3