From: Steve Hay <SteveHay@planit.com>
Date: Fri, 7 Nov 2008 08:49:25 +0000 (+0000)
Subject: Fix new test (just added by podlators upgrade) on Win32, at least
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2dab2cc13c97faef9e98675f369062fe31fb47d6;p=p5sagit%2Fp5-mst-13.2.git

Fix new test (just added by podlators upgrade) on Win32, at least

p4raw-id: //depot/perl@34759
---

diff --git a/lib/Pod/Text.pm b/lib/Pod/Text.pm
index f363303..fa1fd57 100644
--- a/lib/Pod/Text.pm
+++ b/lib/Pod/Text.pm
@@ -37,7 +37,7 @@ use Pod::Simple ();
 # We have to export pod2text for backward compatibility.
 @EXPORT = qw(pod2text);
 
-$VERSION = '3.12';
+$VERSION = '3.12_01';
 
 ##############################################################################
 # Initialization
diff --git a/lib/Pod/t/text-encoding.t b/lib/Pod/t/text-encoding.t
index 2d62480..c803cff 100644
--- a/lib/Pod/t/text-encoding.t
+++ b/lib/Pod/t/text-encoding.t
@@ -53,6 +53,7 @@ while (<DATA>) {
     }
     close TMP;
     open (OUT, '> out.tmp') or die "Cannot create out.tmp: $!\n";
+    eval { binmode (\*OUT, ':raw') };
     $parser->parse_from_file ('tmp.pod', \*OUT);
     close OUT;
     open (TMP, 'out.tmp') or die "Cannot open out.tmp: $!\n";