diff options
Diffstat (limited to 'perl')
| -rw-r--r-- | perl/Locale/Po4a/Text.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl/Locale/Po4a/Text.pm b/perl/Locale/Po4a/Text.pm index eb8ded9..2f9e511 100644 --- a/perl/Locale/Po4a/Text.pm +++ b/perl/Locale/Po4a/Text.pm @@ -179,9 +179,10 @@ sub parse { or $line =~ /^\s*\[\[\!\S[^\]]*\]\]\s*$/)) { # sole macro # Found Markdown markup that should be preserved as a single line do_paragraph($self,$paragraph,$wrapped_mode); - do_paragraph($self,$line."\n",0); - $paragraph=""; + $paragraph="$line\n"; $wrapped_mode = 1; + do_paragraph($self,$paragraph,$wrapped_mode); + $paragraph=""; } elsif ($markdown and ( $paragraph =~ m/^>/ # blockquote or $paragraph =~ m/[<>]/ # maybe html |