diff options
author | Struan Donald <struan@exo.org.uk> | 2011-06-03 16:06:14 +0100 |
---|---|---|
committer | Struan Donald <struan@exo.org.uk> | 2011-06-03 16:06:14 +0100 |
commit | 805b0f85a40d66369150f89e7ff8c54169d0bf5d (patch) | |
tree | 5f79f50d9aa26be2f5ad07e1915fd0e48ad0c92b /perllib/FixMyStreet/App/Controller/Alert.pm | |
parent | b8e2d75cc1c74584dfdf8571c241dab7182c4543 (diff) | |
parent | c10a787f1f529cadae06fd9c8dff58ca7224d223 (diff) |
Merge branch 'migrate_to_catalyst' of ssh://git.mysociety.org/data/git/public/fixmystreet into migrate_to_catalyst
Diffstat (limited to 'perllib/FixMyStreet/App/Controller/Alert.pm')
-rw-r--r-- | perllib/FixMyStreet/App/Controller/Alert.pm | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Alert.pm b/perllib/FixMyStreet/App/Controller/Alert.pm index b8b7cce40..bea5345e3 100644 --- a/perllib/FixMyStreet/App/Controller/Alert.pm +++ b/perllib/FixMyStreet/App/Controller/Alert.pm @@ -96,8 +96,7 @@ sub rss : Private { $c->res->redirect($url); } elsif ( $feed =~ /^local:([\d\.-]+):([\d\.-]+)$/ ) { - ( my $id = $1 ) =~ tr{:_}{/+}; - $url = $c->cobrand->base_url() . '/rss/l/' . $id; + $url = $c->cobrand->base_url() . '/rss/l/' . $1 . ',' . $2; $c->res->redirect($url); } else { @@ -332,9 +331,6 @@ sub prettify_pc : Private { my $pretty_pc_text = $pretty_pc; $pretty_pc_text =~ s/ //g; $c->stash->{pretty_pc_text} = $pretty_pc_text; - - # this may be better done in template - $pretty_pc =~ s/ / /; } $c->stash->{pretty_pc} = $pretty_pc; |