diff options
| author | matthew <matthew> | 2007-05-16 10:55:45 +0000 |
|---|---|---|
| committer | matthew <matthew> | 2007-05-16 10:55:45 +0000 |
| commit | 00fee19b9dff2b7be957434cf9276bda19a7f7cf (patch) | |
| tree | e884b9a1bc118f2668a730abaa7c55ec11929c3a /perllib/Page.pm | |
| parent | df83d5d24e9f10eae831f3e0fda3cb2e1163ce61 (diff) | |
Show category and whether map was used; tabs.
Diffstat (limited to 'perllib/Page.pm')
| -rw-r--r-- | perllib/Page.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perllib/Page.pm b/perllib/Page.pm index 2826c7921..f1b0eda6e 100644 --- a/perllib/Page.pm +++ b/perllib/Page.pm @@ -6,7 +6,7 @@ # Copyright (c) 2006 UK Citizens Online Democracy. All rights reserved. # Email: matthew@mysociety.org; WWW: http://www.mysociety.org/ # -# $Id: Page.pm,v 1.50 2007-05-15 15:12:22 matthew Exp $ +# $Id: Page.pm,v 1.51 2007-05-16 10:55:46 matthew Exp $ # package Page; @@ -376,8 +376,11 @@ sub display_problem_text { # Display information about problem $out .= '<p><em>Reported '; + $out .= 'in the ' . ent($problem->{category}) . ' category ' + if $problem->{category} && $problem->{category} ne 'Other'; $out .= ($problem->{anonymous}) ? 'anonymously' : "by " . ent($problem->{name}); $out .= ' at ' . prettify_epoch($problem->{time}); + $out .= '; the map was not used so pin location may be inaccurate' unless ($problem->{used_map}); if ($problem->{council}) { if ($problem->{whensent}) { $problem->{council} =~ s/\|.*//g; |