diff options
author | matthew <matthew> | 2008-01-28 16:29:46 +0000 |
---|---|---|
committer | matthew <matthew> | 2008-01-28 16:29:46 +0000 |
commit | 2f30055233163a8ae3ad1a85c6f7c276d4c52cbd (patch) | |
tree | d0e9690ee96da98d2d43eebdc36984ed11c5ce54 | |
parent | 6dc3501815ea93b60d8d509a3cbcec1839275922 (diff) |
Track adding of problem on FixMyStreet, and group creation on GroupsNearYou.
-rwxr-xr-x | web/confirm.cgi | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/web/confirm.cgi b/web/confirm.cgi index 445a90d00..6990e7499 100755 --- a/web/confirm.cgi +++ b/web/confirm.cgi @@ -6,7 +6,7 @@ # Copyright (c) 2006 UK Citizens Online Democracy. All rights reserved. # Email: matthew@mysociety.org. WWW: http://www.mysociety.org # -# $Id: confirm.cgi,v 1.31 2008-01-28 15:27:00 matthew Exp $ +# $Id: confirm.cgi,v 1.32 2008-01-28 16:29:46 matthew Exp $ use strict; use Standard; @@ -19,6 +19,7 @@ sub main { my $q = shift; my $out = ''; + my $extra; my $token = $q->param('token'); my $type = $q->param('type') || ''; my $tokentype = $type eq 'questionnaire' ? 'update' : $type; @@ -28,6 +29,7 @@ sub main { $out = confirm_update($q, $id); } elsif ($type eq 'problem') { $out = confirm_problem($q, $id); + $extra = 'added-problem'; } elsif ($type eq 'questionnaire') { $out = add_questionnaire($q, $id, $token); } @@ -42,7 +44,7 @@ EOF print Page::header($q, title=>_('Confirmation')); print $out; - print Page::footer($q); + print Page::footer($q, $extra); } Page::do_fastcgi(\&main); |