From 0cee80a89e120a53ab9ba048346881a33e0863df Mon Sep 17 00:00:00 2001
From: Ben Pfaff <blp@cs.stanford.edu>
Date: Sat, 23 Jan 2021 14:37:27 -0800
Subject: [PATCH] zip-reader: Fix file descriptor leak in zip_reader_create().

---
 src/libpspp/zip-reader.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/libpspp/zip-reader.c b/src/libpspp/zip-reader.c
index 9f20999552..8868c7db33 100644
--- a/src/libpspp/zip-reader.c
+++ b/src/libpspp/zip-reader.c
@@ -388,6 +388,7 @@ zip_reader_create (const char *file_name, struct string *errs)
       zr->n_entries++;
     }
 
+  fclose (file);
   return zr;
 }
 
-- 
2.30.2