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 (file)
--- 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 (file)
--- 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";