set binary mode for some file handling and it might work better on some

cygwin installations (using DOS-style files somehow?)
This commit is contained in:
Daniel Stenberg 2003-03-19 09:26:29 +00:00
parent b28b616eb2
commit b125e8e23a
2 changed files with 3 additions and 1 deletions

View File

@ -95,6 +95,7 @@ sub loadtest {
undef @xml;
open(XML, "<$file") ||
return 1; # failure!
binmode XML; # for crapage systems, use binary
while(<XML>) {
push @xml, $_;
}

View File

@ -637,7 +637,8 @@ sub singletest {
subVariables \$fileContent;
# print "DEBUG: writing file " . $filename . "\n";
open OUTFILE, ">$filename";
print OUTFILE $fileContent;
binmode OUTFILE; # for crapage systems, use binary
print OUTFILE $fileContent;
close OUTFILE;
}