tar/write.c: call missing archive_read_close() in write_archive()

diff --git a/tar/write.c b/tar/write.c
index c6e9fccc4550ea6e3bbcf669727604cd8064b5f0..09c44a3e747be1e0898eca5a53ff67803ad3d5a9 100644 (file)
--- a/tar/write.c
+++ b/tar/write.c
@@ -556,8 +556,7 @@ write_archive(struct archive *a, struct bsdtar *bsdtar)
                            "%s", archive_error_string(disk));
                        if (r == ARCHIVE_FATAL)
                                bsdtar->return_value = 1;
-                       else
-                               archive_read_close(disk);
+                       archive_read_close(disk);
                        goto next_entry;
                }