diff options
| author | Matthew Somerville <matthew@mysociety.org> | 2016-08-15 15:00:13 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew@mysociety.org> | 2016-08-15 15:00:13 +0100 |
| commit | 5886ac658a4d7038a1530a99ff301c3e73ea7fa6 (patch) | |
| tree | 3837eccb25f49fa7a7d94e9764b4321ffec7cca7 /perllib/FixMyStreet/App/View/Web.pm | |
| parent | 30bbbbd885e6a52a4a5be4f7392ae25d6bb52d77 (diff) | |
Fix issue with add_links not interpolating.
Double quoted string is needed for $1 and $2 to not be used exactly.
Diffstat (limited to 'perllib/FixMyStreet/App/View/Web.pm')
| -rw-r--r-- | perllib/FixMyStreet/App/View/Web.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/App/View/Web.pm b/perllib/FixMyStreet/App/View/Web.pm index b750bc4e5..2a9c69044 100644 --- a/perllib/FixMyStreet/App/View/Web.pm +++ b/perllib/FixMyStreet/App/View/Web.pm @@ -116,7 +116,7 @@ sub add_links { my $text = shift; $text =~ s/\r//g; $text = html_filter($text); - $text =~ s{(https?://)([^\s]+)}{'<a href="$1$2">$1' . _space_slash($2) . '</a>'}ge; + $text =~ s{(https?://)([^\s]+)}{"<a href=\"$1$2\">$1" . _space_slash($2) . '</a>'}ge; return $text; } |