]> git.eshelyaron.com Git - emacs.git/commit
* lisp/gnus/nnheader.el (mail-header-*): Define via cl-defstruct
authorStefan Monnier <monnier@iro.umontreal.ca>
Fri, 17 May 2019 01:50:16 +0000 (21:50 -0400)
committerStefan Monnier <monnier@iro.umontreal.ca>
Fri, 17 May 2019 01:50:16 +0000 (21:50 -0400)
commit5f6c08ef2c52c7fe526cbe4f9a684438f6a72007
tree4d8904ab5cdd8f520e96a95bf00620b5dda41f71
parentca3c59146bd5c0effdc7602718b91f1ee41f866a
* lisp/gnus/nnheader.el (mail-header-*): Define via cl-defstruct

This also has the side effect that the accessors are now defined as proper
functions rather than as macros, so they can be passed to `mapcar` etc..

* lisp/gnus/nnheader.el (mail-header-number, mail-header-subject)
(mail-header-from, mail-header-date, mail-header-id)
(mail-header-references, mail-header-chars, mail-header-lines)
(mail-header-xref, mail-header-extra): Define via cl-defstruct.
(mail-header-set-number, mail-header-set-subject)
(mail-header-set-from, mail-header-set-date, mail-header-set-id)
(mail-header-set-message-id, mail-header-set-references)
(mail-header-set-chars, mail-header-set-lines, mail-header-set-xref)
(mail-header-set-extra): Remove, use `setf` instead.  All callers adjusted.

* lisp/gnus/gnus-sum.el (gnus-select-newsgroup)
(gnus-summary-pop-limit, gnus-summary-limit-mark-excluded-as-read)
(gnus-summary-find-matching, gnus-find-matching-articles):
* lisp/gnus/gnus-kill.el (gnus-apply-kill-file-internal, gnus-execute):
* lisp/gnus/gnus-score.el (gnus-score-adaptive):
Eta-reduce, now that mail-header-FIELD are functions.
13 files changed:
lisp/gnus/gnus-agent.el
lisp/gnus/gnus-cache.el
lisp/gnus/gnus-kill.el
lisp/gnus/gnus-salt.el
lisp/gnus/gnus-score.el
lisp/gnus/gnus-sum.el
lisp/gnus/nndiary.el
lisp/gnus/nnfolder.el
lisp/gnus/nnheader.el
lisp/gnus/nnir.el
lisp/gnus/nnmairix.el
lisp/gnus/nnml.el
lisp/gnus/nnweb.el