Don't mark oneliners as non-wrap (and polish coding style).

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