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 | 7e8fa774dd4421aa591cbc33ef6c2cead76abd3a (patch) | |
| tree | 3531b8997bda6b16ee080d60f0bd7f5e264a1ce9 /lisp | |
| parent | e9bd11e57af21f0776571fedf5ff6da93476aa70 (diff) | |
| download | emacs-7e8fa774dd4421aa591cbc33ef6c2cead76abd3a.tar.gz | |
(nnkiboze-close-group): Should only be run from summary buffers.
Diffstat (limited to 'lisp')
| -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) |