sha1_file.c (write_sha1_file): Detect close failure