diff options
| author | Matthew Somerville <matthew-github@dracos.co.uk> | 2016-08-12 16:24:54 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew-github@dracos.co.uk> | 2016-08-12 17:40:43 +0100 |
| commit | 12bddad6bd46d402e55a3c33475cf24a36e84657 (patch) | |
| tree | 172e691bbb02b99bae03cc941b7c0c1b747ac142 /perllib/FixMyStreet/App | |
| parent | 2c30a2a5978f16ef8fda06b20c10f50a628fc787 (diff) | |
Switch link adding to use double quotes.
Diffstat (limited to 'perllib/FixMyStreet/App')
| -rw-r--r-- | perllib/FixMyStreet/App/View/Web.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/perllib/FixMyStreet/App/View/Web.pm b/perllib/FixMyStreet/App/View/Web.pm index 63f21ff91..f3377f7fb 100644 --- a/perllib/FixMyStreet/App/View/Web.pm +++ b/perllib/FixMyStreet/App/View/Web.pm @@ -5,7 +5,6 @@ use strict; use warnings; use mySociety::Locale; -use mySociety::Web qw(ent); use FixMyStreet; use Utils; @@ -115,8 +114,8 @@ Add some links to some text (and thus HTML-escapes the other text. sub add_links { my $text = shift; $text =~ s/\r//g; - $text = ent($text); - $text =~ s{(https?://)([^\s]+)}{"<a href='$1$2'>$1" . _space_slash($2) . '</a>'}ge; + $text = html_filter($text); + $text =~ s{(https?://)([^\s]+)}{'<a href="$1$2">$1' . _space_slash($2) . '</a>'}ge; return $text; } |