[Po4a-commits] r2580 - /trunk/lib/Locale/Po4a/Text.pm
barbier at users.alioth.debian.org
barbier at users.alioth.debian.org
Mon Sep 10 17:07:17 UTC 2012
Author: barbier
Date: Mon Sep 10 17:07:17 2012
New Revision: 2580
URL: http://svn.debian.org/wsvn/po4a/?sc=1&rev=2580
Log:
Do not wrap tables in Asciidoc
Report and patch by Anders Nawroth, thanks!
Modified:
trunk/lib/Locale/Po4a/Text.pm
Modified: trunk/lib/Locale/Po4a/Text.pm
URL: http://svn.debian.org/wsvn/po4a/trunk/lib/Locale/Po4a/Text.pm?rev=2580&op=diff
==============================================================================
--- trunk/lib/Locale/Po4a/Text.pm (original)
+++ trunk/lib/Locale/Po4a/Text.pm Mon Sep 10 17:07:17 2012
@@ -373,7 +373,7 @@
$self->pushline($titlelevel1.$titlespaces.$t.$titlelevel2."\n");
$wrapped_mode = 1;
} elsif ($asciidoc and
- ($line =~ m/^(\/{4,}|\+{4,}|-{4,}|\.{4,}|\*{4,}|_{4,}|={4,}|~{4,})$/)) {
+ ($line =~ m/^(\/{4,}|\+{4,}|-{4,}|\.{4,}|\*{4,}|_{4,}|={4,}|~{4,}|\|={4,})$/)) {
# Found one delimited block
my $t = $line;
$t =~ s/^(.).*$/$1/;
@@ -395,7 +395,7 @@
# PassthroughBlock
$wrapped_mode = 0;
$self->{verbatim} = 1;
- } elsif ($t eq "-") {
+ } elsif ($t eq "-" or $t eq "|") {
# ListingBlock
$wrapped_mode = 0;
$self->{verbatim} = 1;
More information about the Po4a-commits
mailing list