From fbae634bbb5e8caeeeb02fa296f3c68f955fe3d5 Mon Sep 17 00:00:00 2001
From: Matthew Somerville <matthew-github@dracos.co.uk>
Date: Tue, 17 May 2016 11:28:07 +0100
Subject: Fix removal of cached update photos.

It was possible that rotating an update photo did not remove its cached
copy.
---
 perllib/FixMyStreet/App/Model/PhotoSet.pm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'perllib/FixMyStreet/App/Model/PhotoSet.pm')

diff --git a/perllib/FixMyStreet/App/Model/PhotoSet.pm b/perllib/FixMyStreet/App/Model/PhotoSet.pm
index b44bf4b38..030dbd5be 100644
--- a/perllib/FixMyStreet/App/Model/PhotoSet.pm
+++ b/perllib/FixMyStreet/App/Model/PhotoSet.pm
@@ -255,9 +255,11 @@ sub delete_cached {
     my ($self) = @_;
     my $object = $self->object or return;
 
+    my @dirs = ('web', 'photo');
+    push @dirs, 'c' if ref $object eq 'FixMyStreet::DB::Result::Comment';
+
     unlink glob FixMyStreet->path_to(
-        'web',
-        'photo',
+        @dirs,
         $object->id . '.*'
     );
 }
-- 
cgit v1.2.3