Function: rmail-summary--walk-thread-message-recursively

rmail-summary--walk-thread-message-recursively is a byte-compiled function defined in rmailsum.el.gz.

Signature

(rmail-summary--walk-thread-message-recursively MSGNUM ENCOUNTERED-MSGS)

Documentation

Add parents and descendants of message MSGNUM to ENCOUNTERED-MSGS, recursively.

Source Code

;; Defined in /usr/src/emacs/lisp/mail/rmailsum.el.gz
(defun rmail-summary--walk-thread-message-recursively (msgnum encountered-msgs)
  "Add parents and descendants of message MSGNUM to ENCOUNTERED-MSGS, recursively."
  (unless (aref encountered-msgs msgnum)
    (aset encountered-msgs msgnum t)
    (let ((walk-thread-msg
           (lambda (msg)
             (rmail-summary--walk-thread-message-recursively
              msg encountered-msgs))))
      (mapc walk-thread-msg
            (aref rmail-summary-message-parents-vector msgnum))
      (mapc walk-thread-msg
            (aref rmail-summary-message-descendants-vector msgnum)))))