(nnml-open-nov): Don't return dead buffers.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 367efe3..af91f5d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2010-09-26  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * nnml.el (nnml-open-nov): Don't return dead buffers.
+
        * auth-source.el (auth-source-create): Query the user for whether to
        store the credentials.
 

diff --git a/lisp/nnml.el b/lisp/nnml.el
index 42b5321..b84ce51 100644 (file)
--- a/lisp/nnml.el
+++ b/lisp/nnml.el
@@ -846,7 +846,9 @@ article number.  This function is called narrowed to an article."
     buffer))
 
 (defun nnml-open-nov (group)
-  (or (cdr (assoc group nnml-nov-buffer-alist))
+  (or (let ((buffer (cdr (assoc group nnml-nov-buffer-alist))))
+       (and (buffer-name buffer)
+            buffer))
       (let ((buffer (nnml-get-nov-buffer group)))
        (push (cons group buffer) nnml-nov-buffer-alist)
        buffer)))