aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet/DB/Result/Problem.pm
diff options
context:
space:
mode:
authorStruan Donald <struan@exo.org.uk>2011-06-09 08:53:45 +0100
committerStruan Donald <struan@exo.org.uk>2011-06-09 08:53:45 +0100
commit79edaacb35d12c0f7867aab899e016805e99268b (patch)
tree2e38a01d88e57445e06c8697cef742fab7b173d4 /perllib/FixMyStreet/DB/Result/Problem.pm
parenta7fb8b236afb7f7f25008acdafdc5b0585e78b74 (diff)
parentba0bd42476b93908529f63bb8b71135ebf7a86ca (diff)
Merge branch 'migrate_to_catalyst' of ssh://git.mysociety.org/data/git/public/fixmystreet into migrate_to_catalyst
Diffstat (limited to 'perllib/FixMyStreet/DB/Result/Problem.pm')
-rw-r--r--perllib/FixMyStreet/DB/Result/Problem.pm9
1 files changed, 8 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/DB/Result/Problem.pm b/perllib/FixMyStreet/DB/Result/Problem.pm
index f496fb062..f1665ccba 100644
--- a/perllib/FixMyStreet/DB/Result/Problem.pm
+++ b/perllib/FixMyStreet/DB/Result/Problem.pm
@@ -134,7 +134,7 @@ sub whensent_local {
return $self->whensent
? $self->whensent->set_time_zone($tz)
- : $self->confirmed;
+ : $self->whensent;
}
sub lastupdate_local {
@@ -145,6 +145,13 @@ sub lastupdate_local {
: $self->lastupdate;
}
+around service => sub {
+ my ( $orig, $self ) = ( shift, shift );
+ my $s = $self->$orig(@_);
+ $s =~ s/_/ /g;
+ return $s;
+};
+
=head2 check_for_errors
$error_hashref = $problem->check_for_errors();