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;
 

Reply via email to