diff options
| -rw-r--r-- | lisp/gnus/ChangeLog | 4 | ||||
| -rw-r--r-- | 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 @@ | |||
| 1 | 2004-10-06 Katsumi Yamaoka <yamaoka@jpl.org> | ||
| 2 | |||
| 3 | * gnus-sum.el (gnus-summary-insert-subject): Remove redundant setq. | ||
| 4 | |||
| 1 | 2004-10-05 Juri Linkov <juri@jurta.org> | 5 | 2004-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 |