From 98f0a18e77c0d2b13ebfef5083ab95d571df1254 Mon Sep 17 00:00:00 2001
From: Werner Koch <wk@gnupg.org>
Date: Tue, 7 Dec 2004 18:07:30 +0000
Subject: [PATCH] (keybox_release): Close the file pointer.

---
 kbx/ChangeLog     | 4 ++++
 kbx/keybox-init.c | 5 +++++
 2 files changed, 9 insertions(+)

diff --git a/kbx/ChangeLog b/kbx/ChangeLog
index ea5b9dbd1..d75700216 100644
--- a/kbx/ChangeLog
+++ b/kbx/ChangeLog
@@ -1,3 +1,7 @@
+2004-12-07  Werner Koch  <wk@g10code.com>
+
+	* keybox-init.c (keybox_release): Close the file pointer.
+
 2004-11-26  Werner Koch  <wk@g10code.com>
 
 	* Makefile.am (kbxutil_LDADD): Add ../common/libcommon.a
diff --git a/kbx/keybox-init.c b/kbx/keybox-init.c
index e11c4f09c..46a29978a 100644
--- a/kbx/keybox-init.c
+++ b/kbx/keybox-init.c
@@ -102,6 +102,11 @@ keybox_release (KEYBOX_HANDLE hd)
   if (!hd)
     return;
   _keybox_release_blob (hd->found.blob);
+  if (hd->fp)
+    {
+      fclose (hd->fp);
+      hd->fp = NULL;
+    }
   xfree (hd->word_match.name);
   xfree (hd->word_match.pattern);
   xfree (hd);