From a91d9562c6c0ec836f10290df779e2012f18ddec Mon Sep 17 00:00:00 2001
From: Matthew Somerville <matthew-github@dracos.co.uk>
Date: Fri, 3 Mar 2017 17:58:31 +0000
Subject: Add is_in_progress Problem helper.

---
 perllib/FixMyStreet/DB/Result/Problem.pm | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'perllib/FixMyStreet/DB')

diff --git a/perllib/FixMyStreet/DB/Result/Problem.pm b/perllib/FixMyStreet/DB/Result/Problem.pm
index dcd5ecc71..0ab52628e 100644
--- a/perllib/FixMyStreet/DB/Result/Problem.pm
+++ b/perllib/FixMyStreet/DB/Result/Problem.pm
@@ -549,6 +549,16 @@ sub is_open {
     return exists $self->open_states->{ $self->state } ? 1 : 0;
 }
 
+=head2 is_in_progress
+
+Sees if the problem is in an open, not 'confirmed' state.
+
+=cut
+
+sub is_in_progress {
+    my $self = shift;
+    return $self->is_open && $self->state ne 'confirmed' ? 1 : 0;
+}
 
 =head2 is_fixed
 
-- 
cgit v1.2.3