mirror of
https://github.com/curl/curl.git
synced 2025-03-01 15:15:34 +08:00
runtests: show error message if file can't be written
This commit is contained in:
parent
58e85d6d1d
commit
4ced75b7ce
@ -3997,14 +3997,17 @@ sub singletest_prepare {
|
||||
mkdir $d; # 0777
|
||||
}
|
||||
}
|
||||
open(my $outfile, ">", "$filename");
|
||||
binmode $outfile; # for crapage systems, use binary
|
||||
if($fileattr{'nonewline'}) {
|
||||
# cut off the final newline
|
||||
chomp($fileContent);
|
||||
if (open(my $outfile, ">", "$filename")) {
|
||||
binmode $outfile; # for crapage systems, use binary
|
||||
if($fileattr{'nonewline'}) {
|
||||
# cut off the final newline
|
||||
chomp($fileContent);
|
||||
}
|
||||
print $outfile $fileContent;
|
||||
close($outfile);
|
||||
} else {
|
||||
logmsg "ERROR: cannot write $filename\n";
|
||||
}
|
||||
print $outfile $fileContent;
|
||||
close($outfile);
|
||||
}
|
||||
}
|
||||
return ($why, 0);
|
||||
|
Loading…
Reference in New Issue
Block a user