From 805fc78a006ed14fb0830d4e752dbabc6cff4382 Mon Sep 17 00:00:00 2001
From: Jonas Smedegaard <dr@jones.dk>
Date: Sat, 31 May 2008 12:58:40 +0200
Subject: Fix po4a: Really treat line-based Markdown markup as such.

---
 perl/Locale/Po4a/Text.pm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'perl')

diff --git a/perl/Locale/Po4a/Text.pm b/perl/Locale/Po4a/Text.pm
index 77a5cbe..eb8ded9 100644
--- a/perl/Locale/Po4a/Text.pm
+++ b/perl/Locale/Po4a/Text.pm
@@ -175,11 +175,11 @@ sub parse {
             $paragraph="";
             $wrapped_mode = 1;
         } elsif ($markdown and
-                 (   $line =~ m/^#/)) {
-            # Found Markdown headline
-            $wrapped_mode = 0;
-            $paragraph .= $line."\n";
+                 (   $line =~ /^#/            # headline
+                  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="";
             $wrapped_mode = 1;
         } elsif ($markdown and
-- 
cgit v1.2.3