2000-11-08 16:37:02 ShengHuo ZHU <zsh@cs.rochester.edu>

	* gnus-cache.el (gnus-cache-generate-nov-databases): Reopen cache.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 88b6fdb..c00157c 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2000-11-08 16:37:02  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * gnus-cache.el (gnus-cache-generate-nov-databases): Reopen cache.
+
 2000-11-08 08:38:30  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
        * pop3.el (pop3-munge-message-separator): A message may have an

diff --git a/lisp/gnus-cache.el b/lisp/gnus-cache.el
index 3e80bdc..51a978e 100644 (file)
--- a/lisp/gnus-cache.el
+++ b/lisp/gnus-cache.el
@@ -668,7 +668,8 @@ If LOW, update the lower bound instead."
   (interactive (list gnus-cache-directory))
   (gnus-cache-close)
   (let ((nnml-generate-active-function 'identity))
-    (nnml-generate-nov-databases-1 dir)))
+    (nnml-generate-nov-databases-1 dir))
+  (gnus-cache-open))
 
 (defun gnus-cache-move-cache (dir)
   "Move the cache tree to somewhere else."