From e617567a71965fe75234e20364018b01a4e74d1e Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Wed, 7 Jul 2010 15:35:47 -0700
Subject: [PATCH] The first line of a file is allowed to be POD.  Change
 initial conditions of internal flags to allow this.

---
 t/Whitespace.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/t/Whitespace.t b/t/Whitespace.t
index 6191bc76e..c7f4b53a6 100644
--- a/t/Whitespace.t
+++ b/t/Whitespace.t
@@ -65,7 +65,7 @@ sub checkContent {
 	my $content = shift;
 	my @content = @{$content};
 
-	my $podAllowed = 0;
+	my $podAllowed = 1;
 	my $lineNumber = 1;
 	foreach my $line (@content) {
 		chomp $line;