diff options
| author | Jonas Smedegaard <dr@jones.dk> | 2008-10-15 14:57:26 +0200 |
|---|---|---|
| committer | Jonas Smedegaard <dr@jones.dk> | 2008-10-15 14:57:26 +0200 |
| commit | 7d6fc0d0edd7c00983dbffab544a301d2d8121e4 (patch) | |
| tree | 5751fca686c0a26cd205f950b0bee2a551e49990 /perl/Locale/Po4a | |
| parent | dd9b588dfa3d81adc3c061acf0c867f040c1cf5f (diff) | |
| parent | 295d5f1739f2fc7dd7a3a5fd85df6ee194559390 (diff) | |
Merge branch 'master' into _multilang
Diffstat (limited to 'perl/Locale/Po4a')
| -rw-r--r-- | perl/Locale/Po4a/Text.pm | 3 |
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 ); } |