[svn:parrot] r43600 - trunk/lib/Parrot

[fperrad at svn.parrot.org]

Author: fperrad
Date: Tue Jan 26 09:44:11 2010
New Revision: 43600
URL: https://trac.parrot.org/parrot/changeset/43600

Log:
[H2inc] fix on Windows

Modified:
   trunk/lib/Parrot/H2inc.pm

Modified: trunk/lib/Parrot/H2inc.pm
==============================================================================
--- trunk/lib/Parrot/H2inc.pm	Tue Jan 26 09:10:50 2010	(r43599)
+++ trunk/lib/Parrot/H2inc.pm	Tue Jan 26 09:44:11 2010	(r43600)
@@ -44,6 +44,7 @@
 
 sub parse_file {
     my ( $in_file, $out_file) = @_;
+    $out_file =~ s/\\/\//g; # transform Windows backslash
 
     my ( @directives, %values, $last_val, $cur, $or_continues );
     open my $fh, '<', $in_file or die "Can't open $in_file: $!\n";