diff options
| author | Robert Pluim | 2022-11-17 16:53:41 +0100 |
|---|---|---|
| committer | Robert Pluim | 2022-11-17 17:00:26 +0100 |
| commit | 2bf7a06c4bb6cef53bfdfdc58e31128f49b691af (patch) | |
| tree | f2fe576298fca481067777db8d567ea65317da70 | |
| parent | 11e64d0048215a87a80b4a493a2a0295b524cbba (diff) | |
| download | emacs-2bf7a06c4bb6cef53bfdfdc58e31128f49b691af.tar.gz emacs-2bf7a06c4bb6cef53bfdfdc58e31128f49b691af.zip | |
Use mapc instead of mapcar when walking rmail threads
* lisp/mail/rmailsum.el (rmail-summary--walk-thread-message-recursively):
Use `mapc' instead of `mapcar'; we don't care about the results.
| -rw-r--r-- | lisp/mail/rmailsum.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el index 971e504dcd1..f161664d964 100644 --- a/lisp/mail/rmailsum.el +++ b/lisp/mail/rmailsum.el | |||
| @@ -410,10 +410,10 @@ already ticked in ENCOUNTERED-MSGS." | |||
| 410 | (lambda (msg) | 410 | (lambda (msg) |
| 411 | (rmail-summary--walk-thread-message-recursively | 411 | (rmail-summary--walk-thread-message-recursively |
| 412 | msg encountered-msgs)))) | 412 | msg encountered-msgs)))) |
| 413 | (mapcar walk-thread-msg | 413 | (mapc walk-thread-msg |
| 414 | (aref rmail-summary-message-parents-vector msgnum)) | 414 | (aref rmail-summary-message-parents-vector msgnum)) |
| 415 | (mapcar walk-thread-msg | 415 | (mapc walk-thread-msg |
| 416 | (rmail-summary-direct-descendants msgnum encountered-msgs))))) | 416 | (rmail-summary-direct-descendants msgnum encountered-msgs))))) |
| 417 | 417 | ||
| 418 | ;;;###autoload | 418 | ;;;###autoload |
| 419 | (defun rmail-summary-by-thread (&optional msgnum) | 419 | (defun rmail-summary-by-thread (&optional msgnum) |