Author: dagolden
Date: Wed Aug 19 05:09:01 2009
New Revision: 13206
Modified:
Module-Build/trunk/Changes
Module-Build/trunk/lib/Module/Build/PPMMaker.pm
Log:
Generate .ppm with :utf8
Modified: Module-Build/trunk/Changes
==============================================================================
--- Module-Build/trunk/Changes (original)
+++ Module-Build/trunk/Changes Wed Aug 19 05:09:01 2009
@@ -4,6 +4,7 @@
Bug fixes:
- Multiple test fixes for OS2 [Ilya Zakharevich]
+ - Generated.ppd files use :utf8 if possible (RT#48827) [Olivier Mengue]
0.34_05 - Sun Aug 9 22:31:37 EDT 2009
Modified: Module-Build/trunk/lib/Module/Build/PPMMaker.pm
==============================================================================
--- Module-Build/trunk/lib/Module/Build/PPMMaker.pm (original)
+++ Module-Build/trunk/lib/Module/Build/PPMMaker.pm Wed Aug 19 05:09:01 2009
@@ -113,6 +113,7 @@
my $ppd_file = "$dist{name}.ppd";
my $fh = IO::File->new(">$ppd_file")
or die "Cannot write to $ppd_file: $!";
+ $fh->binmode(":utf8") if $fh->can("binmode");
print $fh $ppd;
close $fh;