summaryrefslogtreecommitdiff
path: root/perl
diff options
context:
space:
mode:
authorJonas Smedegaard <dr@jones.dk>2008-10-23 00:47:12 +0200
committerJonas Smedegaard <dr@jones.dk>2008-10-23 00:47:12 +0200
commitfb11d849ffed76a34d6e849e37fddace1894a48a (patch)
tree84d8663c967da6e4d53a56154d2a2b6bf4895750 /perl
parent27d935d22dad54345e5db76a420c291a6e22aa94 (diff)
Disable wrap on macro begin at middle of a line.
Diffstat (limited to 'perl')
-rw-r--r--perl/Locale/Po4a/Text.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl/Locale/Po4a/Text.pm b/perl/Locale/Po4a/Text.pm
index ee56046..32f9dec 100644
--- a/perl/Locale/Po4a/Text.pm
+++ b/perl/Locale/Po4a/Text.pm
@@ -247,7 +247,7 @@ sub parse {
or $paragraph =~ /^\$(\S+[{}]\S*\s*)+/ms # Xapian macro
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
+ or $paragraph =~ /\[\[\!\S[^\]]+$/ms # macro begin
);
}
if ($end_of_paragraph) {