diff options
author | matthew <matthew> | 2008-05-14 14:24:11 +0000 |
---|---|---|
committer | matthew <matthew> | 2008-05-14 14:24:11 +0000 |
commit | d19c5df0b4f4c7284423381d9a94f6905bc0aa19 (patch) | |
tree | 83b3ed94d3e3e283d09fb377c26373036c8545b3 /perllib/Page.pm | |
parent | 56bb3e765278888d211b46bc27290b8bac717a18 (diff) |
Various tweaks.
Diffstat (limited to 'perllib/Page.pm')
-rw-r--r-- | perllib/Page.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/perllib/Page.pm b/perllib/Page.pm index 10ce9fd91..ae5ac0164 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.98 2008-05-14 11:18:35 matthew Exp $ +# $Id: Page.pm,v 1.99 2008-05-14 14:24:11 matthew Exp $ # package Page; @@ -416,9 +416,9 @@ sub send_email { From => [ $sender, _('FixMyStreet')], To => $to, }, $email); - my $out; + my $action = ($thing eq 'alert') ? 'confirmed' : 'posted'; - $out = <<EOF; + my $out = <<EOF; <h1>Nearly Done! Now check your email...</h1> <p>The confirmation email <strong>may</strong> take a few minutes to arrive — <em>please</em> be patient.</p> <p>If you use web-based email or have 'junk mail' filters, you may wish to check your bulk/spam mail folders: sometimes, our messages are marked that way.</p> @@ -495,7 +495,7 @@ sub display_problem_text { $out .= $q->br() . $q->small('Sent to ' . $council . ' ' . prettify_duration($problem->{whensent}, 'minute') . ' later'); } - } else { + } elsif ($q->{site} ne 'emptyhomes') { $out .= $q->br() . $q->small('Not reported to council'); } $out .= '</em></p> <p>'; |