aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet/App/Controller/Rss.pm
diff options
context:
space:
mode:
authorStruan Donald <struan@exo.org.uk>2011-09-20 16:13:15 +0100
committerStruan Donald <struan@exo.org.uk>2011-09-20 16:13:15 +0100
commit6128a2790b682170d2cac4b4674b4ac3ac2dc517 (patch)
tree63b493b3d442db2078c7fbf1b96afc7d275ef1ba /perllib/FixMyStreet/App/Controller/Rss.pm
parentdd82abb2c31d77fbd54799f08322ee074f46a160 (diff)
parent77f31e8c96c727ea5ab9cf217cfd924074e8f3ed (diff)
Merge remote branch 'origin/master' into rss-addresses
Diffstat (limited to 'perllib/FixMyStreet/App/Controller/Rss.pm')
-rwxr-xr-xperllib/FixMyStreet/App/Controller/Rss.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Rss.pm b/perllib/FixMyStreet/App/Controller/Rss.pm
index c2a0eee7e..6152f5a17 100755
--- a/perllib/FixMyStreet/App/Controller/Rss.pm
+++ b/perllib/FixMyStreet/App/Controller/Rss.pm
@@ -194,7 +194,7 @@ sub generate : Private {
my $out = $c->stash->{rss}->as_string;
my $uri = $c->uri_for( '/' . $c->req->path );
- $out =~ s{<link>(.*?)</link>}{"<link>" . $c->uri_for( $1 ) . "</link><uri>$uri</uri>"}e;
+ $out =~ s{(<link>.*?</link>)}{$1<uri>$uri</uri>};
$c->response->header('Content-Type' => 'application/xml; charset=utf-8');
$c->response->body( $out );
@@ -307,7 +307,7 @@ sub add_parameters : Private {
$c->stash->{rss}->channel(
title => ent($title),
- link => $link . ($c->stash->{qs} || ''),
+ link => $c->uri_for($link) . ($c->stash->{qs} || ''),
description => ent($desc),
language => 'en-gb',
);