diff --git a/g10/ChangeLog b/g10/ChangeLog
index 6f2a6325d..702ee4216 100644
--- a/g10/ChangeLog
+++ b/g10/ChangeLog
@@ -1,3 +1,8 @@
+2003-06-08  Werner Koch  <wk@gnupg.org>
+
+	* import.c (import_keys): Invalidate the cache so that the file
+	descriptor gets closed.  Fixes bug reported by Juan F. Codagnone.
+
 2003-06-07  David Shaw  <dshaw@jabberwocky.com>
 
 	* keyedit.c (sign_uids): Do not sign expired uids without --expert
diff --git a/g10/import.c b/g10/import.c
index 049c598d4..4052d0ce5 100644
--- a/g10/import.c
+++ b/g10/import.c
@@ -163,6 +163,8 @@ import_keys( char **fnames, int nnames, int fast,
 	else {
 	    int rc = import( inp, fast, fname, stats, options );
 	    iobuf_close(inp);
+            /* must invalidate that ugly cache to actually close it */
+            iobuf_ioctl (NULL, 2, 0, (char*)fname);
 	    if( rc )
 		log_error("import from `%s' failed: %s\n", fname,
 							   g10_errstr(rc) );