Remove old track.

2 files changed, 1 insertions, 9 deletions

diff --git a/perllib/Page.pm b/perllib/Page.pm
index 1b94f5c2b..917fc6991 100644
--- a/perllib/Page.pm
+++ b/perllib/Page.pm
@@ -33,7 +33,6 @@ use mySociety::EvEl;
 use mySociety::Locale;
 use mySociety::MaPit;
 use mySociety::TempFiles;
-use mySociety::Tracking;
 use mySociety::WatchUpdate;
 use mySociety::Web qw(ent);
 
@@ -315,7 +314,6 @@ sub header ($%) {
 =cut
 sub footer {
     my ($q, %params) = @_;
-    my $extra = $params{extra};
 
     if ($q->{site} ne 'fixmystreet') {
         my $template = template($q, %params) . '-footer';
@@ -330,8 +328,6 @@ sub footer {
 
     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);
 
     my $piwik = "";
     if (mySociety::Config::get('BASE_URL') eq "http://www.fixmystreet.com") {
@@ -375,8 +371,6 @@ $orglogo
 
 <p id="footer">$creditline</p>
 
-$track
-
 $piwik
 
 </body>
diff --git a/web/confirm.cgi b/web/confirm.cgi
index 1ee37c034..925b64ed2 100755
--- a/web/confirm.cgi
+++ b/web/confirm.cgi
@@ -20,7 +20,6 @@ sub main {
     my $q = shift;
     my $cobrand = Page::get_cobrand($q);
     my $out = '';
-    my $extra;
     my $token = $q->param('token');
     my $type = $q->param('type') || '';
     my $tokentype = $type eq 'questionnaire' ? 'update' : $type;
@@ -30,7 +29,6 @@ sub main {
             $out = confirm_update($q, $data);
         } elsif ($type eq 'problem') {
             $out = confirm_problem($q, $data);
-            $extra = 'added-problem';
         } elsif ($type eq 'questionnaire') {
             $out = add_questionnaire($q, $data, $token);
         }
@@ -50,7 +48,7 @@ EOF
     
     print Page::header($q, title=>_('Confirmation'));
     print $out;
-    print Page::footer($q, extra => $extra);
+    print Page::footer($q);
 }
 Page::do_fastcgi(\&main);