X-Git-Url: https://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fnnml.el;h=b84ce518a2801c3991959ebc1e26e3e204b93243;hb=8339220cc25db3fbdab4367d6252e596bddd9cb1;hp=42b532168758d52f132a187b2770a15ddabaf7ed;hpb=06e3d74faa6b1196f0a7b877acc1bb6b6c1563a8;p=gnus diff --git a/lisp/nnml.el b/lisp/nnml.el index 42b532168..b84ce518a 100644 --- 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)))