diff options
author | Jonas Smedegaard <dr@jones.dk> | 2008-08-04 02:19:28 +0200 |
---|---|---|
committer | Jonas Smedegaard <dr@jones.dk> | 2013-10-13 00:47:50 +0200 |
commit | 99961f52866ac7b1adda5ea92ea3e9d2c1363a77 (patch) | |
tree | a7c408c3b18a45eb49d6215d45346317f4c8d531 | |
parent | a9c384661c1e7bb64f8e9beaeeda31ee7a8b8504 (diff) |
Extend make and po4a to support templates.
-rw-r--r-- | Locale/Po4a/Text.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/Locale/Po4a/Text.pm b/Locale/Po4a/Text.pm index 5236095..0cc2cc8 100644 --- a/Locale/Po4a/Text.pm +++ b/Locale/Po4a/Text.pm @@ -179,6 +179,12 @@ sub parse { $paragraph=""; $wrapped_mode = 1; $self->pushline($line."\n"); + } elsif ($line =~ /^-- $/) { + # Break paragraphs on email signature hint + do_paragraph($self,$paragraph,$wrapped_mode); + $paragraph=""; + $wrapped_mode = 1; + $self->pushline($line."\n"); } elsif ( $line =~ /^=+$/ or $line =~ /^_+$/ or $line =~ /^-+$/) { @@ -237,6 +243,7 @@ sub parse { $wrapped_mode = 0 if ( $paragraph =~ /^>/ms # blockquote or $paragraph =~ /^( {8}|\t)/ms # monospaced + or $paragraph =~ /^\$(\S+[{}]\S*\s*)+/ms # Xapian macro or $paragraph =~ /[<>]/ms # maybe html or $paragraph =~ /^\s*\[\[\!\S[^\]]+$/ms # macro begin ); |