Skip to content
Snippets Groups Projects
Commit 608a2511 authored by Andy Yates's avatar Andy Yates
Browse files

Missed this quite important change to avoid the closing of files when they can't be

parent 28a87e15
No related branches found
No related tags found
No related merge requests found
......@@ -134,11 +134,11 @@ sub production_name {
sub tidy_file_handle {
my ($self, $fh, $path) = @_;
if ($fh->tell() == 0) {
$fh->close;
$fh->close() unless $fh->opened();
unlink($path);
return 1;
}
close($fh);
$fh->close() unless $fh->opened();
return 0;
}
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment