From 8efd1df253b96d6de5d5847d3e13b7649a5d707d Mon Sep 17 00:00:00 2001
From: Matthew Somerville <matthew@mysociety.org>
Date: Fri, 23 Aug 2019 14:18:25 +0100
Subject: Ignore very new reports in admin unsent list.

---
 perllib/FixMyStreet/App/Controller/Admin.pm | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'perllib/FixMyStreet/App/Controller/Admin.pm')

diff --git a/perllib/FixMyStreet/App/Controller/Admin.pm b/perllib/FixMyStreet/App/Controller/Admin.pm
index 2de274c61..3cd6bfd70 100644
--- a/perllib/FixMyStreet/App/Controller/Admin.pm
+++ b/perllib/FixMyStreet/App/Controller/Admin.pm
@@ -82,6 +82,8 @@ sub index : Path : Args(0) {
         state => [ FixMyStreet::DB::Result::Problem::open_states() ],
         whensent => undef,
         bodies_str => { '!=', undef },
+        # Ignore very recent ones that probably just haven't been sent yet
+        confirmed => { '<', \"current_timestamp - '5 minutes'::interval" },
     } )->all;
     $c->stash->{unsent_reports} = \@unsent;
 
-- 
cgit v1.2.3