From 64ee3431f5519f1eb36bd6c62acfb386c2769c8a Mon Sep 17 00:00:00 2001 From: Jonas Smedegaard Date: Mon, 18 Oct 2010 16:03:33 +0200 Subject: Fix preserve forced newline in po4a Text module. --- perl/Locale/Po4a/Text.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'perl/Locale/Po4a') diff --git a/perl/Locale/Po4a/Text.pm b/perl/Locale/Po4a/Text.pm index 8f703c8..bbb78af 100644 --- a/perl/Locale/Po4a/Text.pm +++ b/perl/Locale/Po4a/Text.pm @@ -651,6 +651,7 @@ sub parse { or $paragraph =~ /^\$(\S+[{}]\S*\s*)+/ms # Xapian macro or $paragraph =~ /<(?![a-z]+[:@])/ms # maybe html (tags but not wiki ) or $paragraph =~ /^[^<]+>/ms # maybe html (tag with vertical space) + or $paragraph =~ /\S $/ms # explicit newline or $paragraph =~ /\[\[\!\S[^\]]+$/ms # macro begin ); } -- cgit v1.2.3