From c3bc41c2d82fa7dea41f27e800ca4d9addb6bf89 Mon Sep 17 00:00:00 2001 From: Miles Bader Date: Wed, 6 Oct 2004 15:51:45 +0000 Subject: [PATCH] Revision: miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-599 Merge from gnus--rel--5.10 Patches applied: * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-42 Update from CVS * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-43 Merge from emacs--cvs-trunk--0 --- lisp/gnus/ChangeLog | 4 ++++ lisp/gnus/gnus-sum.el | 3 +-- 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 @@ +2004-10-06 Katsumi Yamaoka + + * gnus-sum.el (gnus-summary-insert-subject): Remove redundant setq. + 2004-10-05 Juri Linkov * 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." ;; Remove list identifiers from subject. (when gnus-list-identifiers (let ((gnus-newsgroup-headers (list header))) - (gnus-summary-remove-list-identifiers) - (setq header (car gnus-newsgroup-headers)))) + (gnus-summary-remove-list-identifiers))) (when old-header (mail-header-set-number header (mail-header-number old-header))) (setq gnus-newsgroup-sparse -- 2.39.5