From 4e1a4c5508b599c56bf457b602dd7c506432f494 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 17 Jan 1996 00:22:11 +0000 Subject: (nnkiboze-close-group): Should only be run from summary buffers. --- lisp/nnkiboze.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lisp/nnkiboze.el') diff --git a/lisp/nnkiboze.el b/lisp/nnkiboze.el index 8b2fc894da5..4260e5fc46f 100644 --- a/lisp/nnkiboze.el +++ b/lisp/nnkiboze.el @@ -147,7 +147,8 @@ If the stream is opened, return T, otherwise return NIL." (defun nnkiboze-close-group (group &optional server) (nnkiboze-possibly-change-newsgroups group) ;; Remove NOV lines of articles that are marked as read. - (if (not (file-exists-p (nnkiboze-nov-file-name))) + (if (or (not (file-exists-p (nnkiboze-nov-file-name))) + (not (eq major-mode 'gnus-summary-mode))) () (save-excursion (let ((unreads gnus-newsgroup-unreads) -- cgit v1.2.1