diff options
| author | matthew <matthew> | 2008-01-30 18:27:47 +0000 |
|---|---|---|
| committer | matthew <matthew> | 2008-01-30 18:27:47 +0000 |
| commit | a72b0e5ac51da6403f954bab3db9107ea0a9d099 (patch) | |
| tree | 2af8adfa0f4fb8c198c3047718e978c578cf5343 /perllib/Page.pm | |
| parent | 853232c586cfa667d02ac645db97947144fa0ae6 (diff) | |
Random messages on FixMyStreet (needs checking before deploying, once balti
is back up); typo in PHP version.
Diffstat (limited to 'perllib/Page.pm')
| -rw-r--r-- | perllib/Page.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perllib/Page.pm b/perllib/Page.pm index 8ae6a2fe3..05324cab6 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.72 2008-01-28 15:27:00 matthew Exp $ +# $Id: Page.pm,v 1.73 2008-01-30 18:27:47 matthew Exp $ # package Page; @@ -119,6 +119,7 @@ sub footer { my ($q, $extra) = @_; my $pc = $q->param('pc') || ''; $pc = "?pc=" . ent($pc) if $pc; + $extra = $q->scratch() if $q->scratch(); # Overrides my $track = mySociety::Tracking::code($q, $extra); return <<EOF; </div></div> |