aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStruan Donald <struan@exo.org.uk>2011-06-15 16:55:06 +0100
committerStruan Donald <struan@exo.org.uk>2011-06-15 16:55:06 +0100
commit7ef671b3177a69177f1412d1ece46b3e3d92f425 (patch)
treef1cda5aced13911f3245ff8f313d24e9f0597c4f
parent7b2fb6cd9934fae59d89cfeabf5260a54713c26f (diff)
docs and formatting
-rw-r--r--perllib/FixMyStreet/DB/Result/Problem.pm16
1 files changed, 11 insertions, 5 deletions
diff --git a/perllib/FixMyStreet/DB/Result/Problem.pm b/perllib/FixMyStreet/DB/Result/Problem.pm
index 3e82e3784..daedf5577 100644
--- a/perllib/FixMyStreet/DB/Result/Problem.pm
+++ b/perllib/FixMyStreet/DB/Result/Problem.pm
@@ -284,16 +284,22 @@ sub get_photo_params {
return $photo;
}
+=head2 is_open
+
+Returns 1 if the problem is in a open state otherwise 0;
+
+=cut
+
sub is_open {
my $self = shift;
my %open_states = (
- unconfirmed => 1,
- partial => 1,
- confirmed => 1,
- 'planned' => 1,
+ unconfirmed => 1,
+ partial => 1,
+ confirmed => 1,
+ 'planned' => 1,
'investigating' => 1,
- 'in progress' => 1,
+ 'in progress' => 1,
);
return exists $open_states{ $self->state } ? 1 : 0;