From 3aefbdb28ba7d5445d31105a9da971be250057ec Mon Sep 17 00:00:00 2001
From: Jonas Smedegaard <dr@jones.dk>
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