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
|
mkdir $d; # 0777
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
open(my $outfile, ">", "$filename");
|
if (open(my $outfile, ">", "$filename")) {
|
||||||
binmode $outfile; # for crapage systems, use binary
|
binmode $outfile; # for crapage systems, use binary
|
||||||
if($fileattr{'nonewline'}) {
|
if($fileattr{'nonewline'}) {
|
||||||
# cut off the final newline
|
# cut off the final newline
|
||||||
chomp($fileContent);
|
chomp($fileContent);
|
||||||
|
}
|
||||||
|
print $outfile $fileContent;
|
||||||
|
close($outfile);
|
||||||
|
} else {
|
||||||
|
logmsg "ERROR: cannot write $filename\n";
|
||||||
}
|
}
|
||||||
print $outfile $fileContent;
|
|
||||||
close($outfile);
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
return ($why, 0);
|
return ($why, 0);
|
||||||
|
Loading…
Reference in New Issue
Block a user