Remove fake_q and most of now-unused Page.pm.

1 files changed, 0 insertions, 37 deletions

diff --git a/perllib/FixMyStreet/App.pm b/perllib/FixMyStreet/App.pm
index ec7ec3ff0..09a8609fe 100644
--- a/perllib/FixMyStreet/App.pm
+++ b/perllib/FixMyStreet/App.pm
@@ -11,7 +11,6 @@ use mySociety::Email;
 use mySociety::EmailUtil;
 use mySociety::Random qw(random_bytes);
 use FixMyStreet::Map;
-use FixMyStreet::FakeQ;
 
 use URI;
 use URI::QueryParam;
@@ -133,11 +132,6 @@ sub _get_cobrand {
 
     my $cobrand = $cobrand_class->new( { request => $c->req } );
 
-    # create the cobrand explicitly passing in the site. Avoids the chicken and
-    # egg situation where one needs to be created first. Should disappear when
-    # all instances of the old '$q' are gone.
-    $cobrand->fake_q( $c->fake_q( { site => $cobrand->moniker } ) );
-
     return $cobrand;
 }
 
@@ -390,37 +384,6 @@ sub uri_for_email {
     return URI->new($email_uri);
 }
 
-=head2 fake_q
-
-    $q = $c->fake_q();                                   # normal usage
-    $q = $c->fake_q( { site => 'cobrand_moniker' } );    # when creating
-
-Returns a faked up object that behaves as the old code expects the old '$q' to
-behave. Object is cached for the request. See L<FixMyStreet::FakeQ> for more
-details.
-
-The first time fake_q is called you need to pass in 'site' explicitly. This
-should normally be done automatically when the cobrand is first loaded.
-
-=cut
-
-sub fake_q {
-    my $c    = shift;
-    my $args = shift;
-
-    return $c->stash->{fakeq}    #
-      ||= $c->_get_fake_q($args);
-}
-
-sub _get_fake_q {
-    my $c = shift;
-    my $args = shift || {};
-
-    $args->{params} ||= $c->req->parameters;
-
-    return FixMyStreet::FakeQ->new($args);
-}
-
 =head1 SEE ALSO
 
 L<FixMyStreet::App::Controller::Root>, L<Catalyst>