X-Git-Url: https://git.distorted.org.uk/~mdw/catacomb/blobdiff_plain/011174f4c9c5c7abffb14060dddd6311ca417391..b7715b9ac9cd85dd1d5018f27ea3f0eea02f20ff:/key/key-io.c

diff --git a/key/key-io.c b/key/key-io.c
index 843f81d8..c79c8e06 100644
--- a/key/key-io.c
+++ b/key/key-io.c
@@ -439,7 +439,7 @@ int key_open(key_file *f, const char *file, unsigned how,
 
   if ((how & KOPEN_MASK) == KOPEN_READ) {
     f->f &= ~KF_WRITE;
-    fclose(f->fp);
+    if (f->fp) fclose(f->fp);
     f->fp = 0;
   }