diff options
author | M Somerville <matthew-github@dracos.co.uk> | 2020-10-01 17:56:29 +0100 |
---|---|---|
committer | M Somerville <matthew-github@dracos.co.uk> | 2020-10-02 13:31:47 +0100 |
commit | 399b8a783a1833098ab8401087d8a6609ac6d515 (patch) | |
tree | 0a87f53a0e2a25d97e9217ef3107d4976c358a1f /perllib/FixMyStreet/App/Controller/Test.pm | |
parent | 5fb4955f20a9173830b8d47fd006bda16132d9a3 (diff) |
Record whether report made on desktop or mobile.
Diffstat (limited to 'perllib/FixMyStreet/App/Controller/Test.pm')
-rw-r--r-- | perllib/FixMyStreet/App/Controller/Test.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Test.pm b/perllib/FixMyStreet/App/Controller/Test.pm index 19a8c5321..ce54f004f 100644 --- a/perllib/FixMyStreet/App/Controller/Test.pm +++ b/perllib/FixMyStreet/App/Controller/Test.pm @@ -61,6 +61,9 @@ sub setup : Path('/_test/setup') : Args(1) { }); $category->update; $c->response->body("OK"); + } elsif ($test eq 'simple-service-check') { + my $problem = FixMyStreet::DB->resultset("Problem")->search(undef, { order_by => { -desc => 'id' } })->first; + $c->response->body($problem->service); } } |