Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-17 10:27:41 +00:00
Code Issues Projects Releases Packages Wiki Activity

Use mapc instead of mapcar when walking rmail threads

Browse source 
* lisp/mail/rmailsum.el (rmail-summary--walk-thread-message-recursively):
Use `mapc' instead of `mapcar'; we don't care about the results.
This commit is contained in:
Robert Pluim 2022-11-17 16:53:41 +01:00
parent 11e64d0048
commit 2bf7a06c4b
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lisp/mail/rmailsum.el
View file

@ -410,10 +410,10 @@ already ticked in ENCOUNTERED-MSGS."
(lambda (msg)
(rmail-summary--walk-thread-message-recursively
msg encountered-msgs))))
(mapcar walk-thread-msg
(aref rmail-summary-message-parents-vector msgnum))
(mapcar walk-thread-msg
(rmail-summary-direct-descendants msgnum encountered-msgs)))))
(mapc walk-thread-msg
(aref rmail-summary-message-parents-vector msgnum))
(mapc walk-thread-msg
(rmail-summary-direct-descendants msgnum encountered-msgs)))))
;;;###autoload
(defun rmail-summary-by-thread (&optional msgnum)