diff options
| author | Matthew Somerville <matthew-github@dracos.co.uk> | 2018-08-31 14:10:16 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew-github@dracos.co.uk> | 2018-08-31 14:11:51 +0100 |
| commit | 02b907f535d7166aceeb2f3fb17b9b2e6cb64e72 (patch) | |
| tree | 240e512475ca395c10e9fe9d6f61f1de0b888be1 /perllib | |
| parent | 0ca53384fe8e693d8d246e2b32b30695fd14200f (diff) | |
Convert all single newlines, not only first.
Diffstat (limited to 'perllib')
| -rw-r--r-- | perllib/FixMyStreet/Template.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/Template.pm b/perllib/FixMyStreet/Template.pm index 4a9cffecb..9c565114b 100644 --- a/perllib/FixMyStreet/Template.pm +++ b/perllib/FixMyStreet/Template.pm @@ -114,7 +114,7 @@ into <br>s too. sub html_paragraph : Filter('html_para') { my $text = shift; my @paras = split(/(?:\r?\n){2,}/, $text); - s/\r?\n/<br>\n/ for @paras; + s/\r?\n/<br>\n/g for @paras; $text = "<p>\n" . join("\n</p>\n\n<p>\n", @paras) . "</p>\n"; return $text; } |