From 3aefbdb28ba7d5445d31105a9da971be250057ec Mon Sep 17 00:00:00 2001 From: Jonas Smedegaard Date: Sun, 3 Aug 2008 17:45:34 +0200 Subject: Fix Locale::Po4a::Text reset flags on new file. --- perl/Locale/Po4a/Text.pm | 2 ++ 1 file changed, 2 insertions(+) (limited to 'perl/Locale/Po4a') 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 -- cgit v1.2.3