summaryrefslogtreecommitdiff
path: root/perl/Locale/Po4a
diff options
context:
space:
mode:
authorJonas Smedegaard <dr@jones.dk>2008-08-03 17:45:34 +0200
committerJonas Smedegaard <dr@jones.dk>2008-08-03 17:45:34 +0200
commit3aefbdb28ba7d5445d31105a9da971be250057ec (patch)
treec967e3a1213db0bcf7ef0aa8bcda8343a18aae88 /perl/Locale/Po4a
parent67d824f87b55cc1e70a21e2e5304e3f2c412774b (diff)
Fix Locale::Po4a::Text reset flags on new file.
Diffstat (limited to 'perl/Locale/Po4a')
-rw-r--r--perl/Locale/Po4a/Text.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/perl/Locale/Po4a/Text.pm b/perl/Locale/Po4a/Text.pm
index fad995a..f8dd497 100644
--- a/perl/Locale/Po4a/Text.pm
+++ b/perl/Locale/Po4a/Text.pm
@@ -138,6 +138,8 @@ sub parse {
$file = $1;
do_paragraph($self,$paragraph,$wrapped_mode);
$paragraph="";
+ $wrapped_mode = 1;
+ $expect_header = 1;
}
# TODO: preserve original line ends throughout the code instead