summaryrefslogtreecommitdiff
path: root/perl/Locale
diff options
context:
space:
mode:
authorJonas Smedegaard <dr@jones.dk>2008-05-31 09:49:22 +0200
committerJonas Smedegaard <dr@jones.dk>2008-05-31 09:49:22 +0200
commit6010a16bcfd29e419225eca92d70e9d9f070af32 (patch)
tree8f779c385e68f409b9649929ad3434107e8ce432 /perl/Locale
parentc1443bc8adc52a03b86cc3dc57a6848766093d25 (diff)
Fix po4a: Treat paragraph-based Markdown markup as such.
Diffstat (limited to 'perl/Locale')
-rw-r--r--perl/Locale/Po4a/Text.pm16
1 files changed, 10 insertions, 6 deletions
diff --git a/perl/Locale/Po4a/Text.pm b/perl/Locale/Po4a/Text.pm
index 0edb376..77a5cbe 100644
--- a/perl/Locale/Po4a/Text.pm
+++ b/perl/Locale/Po4a/Text.pm
@@ -175,17 +175,21 @@ sub parse {
$paragraph="";
$wrapped_mode = 1;
} elsif ($markdown and
- ( $line =~ m/^#/ # headline
- or $line =~ m/^>/ # blockquote
- or $line =~ m/[<>]/ # maybe html
- or $line =~ m/^"""/ # textblock inside macro end
- or $line =~ m/"""$/)) { # textblock inside macro begin
- # Found headline
+ ( $line =~ m/^#/)) {
+ # Found Markdown headline
$wrapped_mode = 0;
$paragraph .= $line."\n";
do_paragraph($self,$paragraph,$wrapped_mode);
$paragraph="";
$wrapped_mode = 1;
+ } elsif ($markdown and
+ ( $paragraph =~ m/^>/ # blockquote
+ or $paragraph =~ m/[<>]/ # maybe html
+ or $paragraph =~ m/^"""/ # textblock inside macro end
+ or $paragraph =~ m/"""$/)) { # textblock inside macro begin
+ # Found Markdown markup that might not survive wrapping
+ $wrapped_mode = 0;
+ $paragraph .= $line."\n";
} else {
if ($line =~ /^\s/) {
# A line starting by a space indicates a non-wrap
;'/> -rw-r--r--tags/de/1e/20141123110301.4676.80872@bastian.jones.dk/debian0
-rw-r--r--tags/de/1e/20141123110301.4676.80872@bastian.jones.dk/jones0
-rw-r--r--tags/de/1e/20141123110301.4676.80872@bastian.jones.dk/sent0
-rw-r--r--tags/de/1e/20141123110301.4676.80872@bastian.jones.dk/signed0
-rw-r--r--tags/de/1e/20161015051854.C59F41C09C@jawa.homebase.dk/hb0
-rw-r--r--tags/de/1e/20161015051854.C59F41C09C@jawa.homebase.dk/sys0
-rw-r--r--tags/de/1e/20161015051854.C59F41C09C@jawa.homebase.dk/unread0
-rw-r--r--tags/de/1e/20171023100326.51B8E617F@lxp5.free-owl.de/sys0
-rw-r--r--tags/de/1e/20171023100326.51B8E617F@lxp5.free-owl.de/unread0
-rw-r--r--tags/de/1e/87y4ijb5xu.fsf@msgid.hilluzination.de/debian0
-rw-r--r--tags/de/1e/CALL8gRadZbHPKTPK6SK=RdvgmQP6-Veo0YfAdzr+gKJ4dqtnXw@mail.gmail.com/debian0
-rw-r--r--tags/de/1e/E1mKvYK-00008u-4y@respighi.debian.org/debian0
-rw-r--r--tags/de/1e/E1mKvYK-00008u-4y@respighi.debian.org/inbox0
-rw-r--r--tags/de/1e/E1mKvYK-00008u-4y@respighi.debian.org/killed0
-rw-r--r--tags/de/1e/E1mKvYK-00008u-4y@respighi.debian.org/unread0
-rw-r--r--tags/de/1e/mailman.6.1596866404.6697.kpt12@lists.homebase.dk/hb0
-rw-r--r--tags/de/1e/mailman.6.1596866404.6697.kpt12@lists.homebase.dk/inbox0
-rw-r--r--tags/de/1e/mailman.6.1596866404.6697.kpt12@lists.homebase.dk/killed0
-rw-r--r--tags/de/1e/mailman.6.1596866404.6697.kpt12@lists.homebase.dk/unread0
32 files changed, 0 insertions, 0 deletions