Function: message-user-mail-address

message-user-mail-address is a byte-compiled function defined in message.el.gz.

Signature

(message-user-mail-address)

Documentation

Return the pertinent part of user-mail-address.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/message.el.gz
(defun message-user-mail-address ()
  "Return the pertinent part of `user-mail-address'."
  (when (and user-mail-address
	     (string-match "@.*\\." user-mail-address))
    (if (string-search " " user-mail-address)
	(nth 1 (mail-extract-address-components user-mail-address))
      user-mail-address)))