diff options
| author | Edmund von der Burg <evdb@mysociety.org> | 2011-04-14 17:32:11 +0100 |
|---|---|---|
| committer | Edmund von der Burg <evdb@mysociety.org> | 2011-04-14 17:32:11 +0100 |
| commit | 45cfea76ae7035532fe046e2cb503c147cfb90f8 (patch) | |
| tree | 30f42d28ed8c16b89bbc9a574edabccd7e2f1dbb /perllib/FixMyStreet/App.pm | |
| parent | 8251ee5917f2e929122e40a8d4d7eefcccd9adba (diff) | |
add ->fake_q stub
Diffstat (limited to 'perllib/FixMyStreet/App.pm')
| -rw-r--r-- | perllib/FixMyStreet/App.pm | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App.pm b/perllib/FixMyStreet/App.pm index 8e6766f58..8a93e4501 100644 --- a/perllib/FixMyStreet/App.pm +++ b/perllib/FixMyStreet/App.pm @@ -313,6 +313,23 @@ sub uri_for_email { return URI->new($email_uri); } +=head2 fake_q + + $q = $c->fake_q(); + +Returns a faked up object that behaves as the old code expects the old '$q' to +behave. + +=cut + +sub fake_q { + my $c = shift; + + # FIXME - implement fully + # site + return $c->req; +} + =head1 SEE ALSO L<FixMyStreet::App::Controller::Root>, L<Catalyst> |