diff options
| author | Matthew Somerville <matthew@cake.ukcod.org.uk> | 2010-05-19 13:55:57 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew@cake.ukcod.org.uk> | 2010-05-19 13:55:57 +0100 |
| commit | 13812124a3160bb39fab352bd1f3f14cc6148532 (patch) | |
| tree | 69785504b670d7c4acb14f81ce16190b66b80e42 | |
| parent | 169502aaa28c795493d9ad60ef14f6189db91b87 (diff) | |
Tweak to service display.
| -rw-r--r-- | perllib/Problems.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perllib/Problems.pm b/perllib/Problems.pm index 69293e162..14fdca877 100644 --- a/perllib/Problems.pm +++ b/perllib/Problems.pm @@ -209,7 +209,7 @@ sub fixed_nearby { sub fetch_problem { my $id = shift; - dbh()->selectrow_hashref( + my $p = dbh()->selectrow_hashref( "select id, easting, northing, council, category, title, detail, photo, used_map, name, anonymous, extract(epoch from confirmed) as time, state, extract(epoch from whensent-confirmed) as whensent, @@ -218,7 +218,10 @@ sub fetch_problem { from problem where id=? and state in ('confirmed','fixed', 'hidden') $site_restriction", {}, $id ); + $p->{service} =~ s/_/ /g; + return $p; } + # API functions sub problems_matching_criteria { |