aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet/App/Controller/Rss.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perllib/FixMyStreet/App/Controller/Rss.pm')
-rwxr-xr-xperllib/FixMyStreet/App/Controller/Rss.pm6
1 files changed, 5 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Rss.pm b/perllib/FixMyStreet/App/Controller/Rss.pm
index 3497ad0e1..7cf4783c0 100755
--- a/perllib/FixMyStreet/App/Controller/Rss.pm
+++ b/perllib/FixMyStreet/App/Controller/Rss.pm
@@ -3,7 +3,7 @@ package FixMyStreet::App::Controller::Rss;
use Moose;
use namespace::autoclean;
use POSIX qw(strftime);
-use HTML::Entities;
+use HTML::Entities qw();
use URI::Escape;
use XML::RSS;
@@ -28,6 +28,10 @@ Catalyst Controller.
=cut
+sub encode_entities {
+ HTML::Entities::encode_entities($_[0], '\x00-\x1f\x7f<>&"\'');
+}
+
sub updates : LocalRegex('^(\d+)$') {
my ( $self, $c ) = @_;