diff options
author | Dave Whiteland <dave@mysociety.org> | 2012-11-11 18:25:31 +0000 |
---|---|---|
committer | Dave Whiteland <dave@mysociety.org> | 2012-11-11 18:25:31 +0000 |
commit | 8bb4435aa3caa5e0ffa9accc60f8f02640dddac0 (patch) | |
tree | b8c38473c940581ebebb3d5e377ecc8f40658d1c /perllib/FixMyStreet/App/Controller/Rss.pm | |
parent | f7c869a6f00378be9a43d3676b1a03c2df484ea4 (diff) | |
parent | 74c1a09a10d606d9d8850f7fb70b6e578d2c3877 (diff) |
Merge branch 'master' into boilerplate-mm-js
Diffstat (limited to 'perllib/FixMyStreet/App/Controller/Rss.pm')
-rwxr-xr-x | perllib/FixMyStreet/App/Controller/Rss.pm | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Rss.pm b/perllib/FixMyStreet/App/Controller/Rss.pm index fe4b652ed..baaa3b927 100755 --- a/perllib/FixMyStreet/App/Controller/Rss.pm +++ b/perllib/FixMyStreet/App/Controller/Rss.pm @@ -106,10 +106,19 @@ sub local_problems_pc_distance : Path('pc') : Args(2) { } -sub local_problems : LocalRegex('^(n|l)/([\d.-]+)[,/]([\d.-]+)(?:/(\d+))?$') { +sub local_problems_dist : LocalRegex('^(n|l)/([\d.-]+)[,/]([\d.-]+)/(\d+)$') { my ( $self, $c ) = @_; + $c->forward( 'local_problems', $c->req->captures ); +} + +sub local_problems_no_dist : LocalRegex('^(n|l)/([\d.-]+)[,/]([\d.-]+)$') { + my ( $self, $c ) = @_; + $c->forward( 'local_problems', $c->req->captures ); +} + +sub local_problems : Private { + my ( $self, $c, $type, $a, $b, $d ) = @_; - my ( $type, $a, $b, $d) = @{ $c->req->captures }; $c->forward( 'get_query_parameters', [ $d ] ); $c->detach( 'redirect_lat_lon', [ $a, $b ] ) |