summaryrefslogtreecommitdiff
path: root/perl/Locale/Po4a/Text.pm
diff options
context:
space:
mode:
authorJonas Smedegaard <dr@jones.dk>2008-10-15 14:57:22 +0200
committerJonas Smedegaard <dr@jones.dk>2008-10-15 14:57:22 +0200
commit060a04f45e48ec3963beec69e8168ca41d6d324d (patch)
tree99a38d542aea70cf98c7517e47521e518fd98cd5 /perl/Locale/Po4a/Text.pm
parente71f097ace69aa40cd83ad9fb31db7b82272baac (diff)
parent295d5f1739f2fc7dd7a3a5fd85df6ee194559390 (diff)
Merge branch 'master' into _clean
Diffstat (limited to 'perl/Locale/Po4a/Text.pm')
-rw-r--r--perl/Locale/Po4a/Text.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl/Locale/Po4a/Text.pm b/perl/Locale/Po4a/Text.pm
index 3ceeec9..ee56046 100644
--- a/perl/Locale/Po4a/Text.pm
+++ b/perl/Locale/Po4a/Text.pm
@@ -245,7 +245,8 @@ sub parse {
$paragraph =~ /^>/ms # blockquote
or $paragraph =~ /^( {8}|\t)/ms # monospaced
or $paragraph =~ /^\$(\S+[{}]\S*\s*)+/ms # Xapian macro
- or $paragraph =~ /[<>]/ms # maybe html
+ or $paragraph =~ /<(?![a-z]+[:@])/ms # maybe html (tags but not wiki <URI>)
+ or $paragraph =~ /^[^<]+>/ms # maybe html (tag with vertical space)
or $paragraph =~ /^\s*\[\[\!\S[^\]]+$/ms # macro begin
);
}