aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/gnus/ChangeLog4
-rw-r--r--lisp/gnus/gnus-sum.el3
2 files changed, 5 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index c072a77a807..0bdf47226ff 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,7 @@
12004-10-06 Katsumi Yamaoka <yamaoka@jpl.org>
2
3 * gnus-sum.el (gnus-summary-insert-subject): Remove redundant setq.
4
12004-10-05 Juri Linkov <juri@jurta.org> 52004-10-05 Juri Linkov <juri@jurta.org>
2 6
3 * gnus-group.el (gnus-update-group-mark-positions): 7 * gnus-group.el (gnus-update-group-mark-positions):
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index abbecbbdff2..6c7c0436bc2 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -6013,8 +6013,7 @@ the subject line on."
6013 ;; Remove list identifiers from subject. 6013 ;; Remove list identifiers from subject.
6014 (when gnus-list-identifiers 6014 (when gnus-list-identifiers
6015 (let ((gnus-newsgroup-headers (list header))) 6015 (let ((gnus-newsgroup-headers (list header)))
6016 (gnus-summary-remove-list-identifiers) 6016 (gnus-summary-remove-list-identifiers)))
6017 (setq header (car gnus-newsgroup-headers))))
6018 (when old-header 6017 (when old-header
6019 (mail-header-set-number header (mail-header-number old-header))) 6018 (mail-header-set-number header (mail-header-number old-header)))
6020 (setq gnus-newsgroup-sparse 6019 (setq gnus-newsgroup-sparse