From eb68c3fa83ce8796a69429c83adedddba64c7cdc Mon Sep 17 00:00:00 2001
From: Matthew Somerville <matthew@mysociety.org>
Date: Wed, 6 Nov 2019 15:45:12 +0000
Subject: Ignore empty paragraphs in html_para.

And do not generate them needlessly.
---
 perllib/FixMyStreet/Template.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perllib/FixMyStreet/Template.pm')

diff --git a/perllib/FixMyStreet/Template.pm b/perllib/FixMyStreet/Template.pm
index 9c565114b..ba4376959 100644
--- a/perllib/FixMyStreet/Template.pm
+++ b/perllib/FixMyStreet/Template.pm
@@ -113,7 +113,7 @@ into <br>s too.
 
 sub html_paragraph : Filter('html_para') {
     my $text = shift;
-    my @paras = split(/(?:\r?\n){2,}/, $text);
+    my @paras = grep { $_ } split(/(?:\r?\n){2,}/, $text);
     s/\r?\n/<br>\n/g for @paras;
     $text = "<p>\n" . join("\n</p>\n\n<p>\n", @paras) . "</p>\n";
     return $text;
-- 
cgit v1.2.3