Function: rmail-summary--address-display

rmail-summary--address-display is a byte-compiled function defined in rmailsum.el.gz.

Signature

(rmail-summary--address-display PART)

Documentation

Return display text for parsed address PART, or nil.

Prefer a non-empty real name, falling back to a non-empty email address.

Source Code

;; Defined in /usr/src/emacs/lisp/mail/rmailsum.el.gz
(defun rmail-summary--address-display (part)
  "Return display text for parsed address PART, or nil.
Prefer a non-empty real name, falling back to a non-empty email address."
  (let ((name (and (consp part) (cdr part)))
        (addr (cond ((consp part) (car part))
                    ((stringp part) part))))
    (setq name (and (stringp name) (string-trim name)))
    (setq addr (and (stringp addr) (string-trim addr)))
    (cond ((and name (> (length name) 0)) name)
          ((and addr (> (length addr) 0)) addr))))