diff options
author | Richard M. Stallman <rms@gnu.org> | 1996-01-17 00:22:11 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1996-01-17 00:22:11 +0000 |
commit | 4e1a4c5508b599c56bf457b602dd7c506432f494 (patch) | |
tree | e902b71d109434255ec2216c7a9582db06abb9fb /lisp/nnkiboze.el | |
parent | 60e0aaf0bedcf9d988bcf30745b669766f5ad652 (diff) | |
download | emacs-4e1a4c5508b599c56bf457b602dd7c506432f494.tar.gz |
(nnkiboze-close-group): Should only be run from summary buffers.
Diffstat (limited to 'lisp/nnkiboze.el')
-rw-r--r-- | lisp/nnkiboze.el | 3 |
1 files changed, 2 insertions, 1 deletions
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) |