Function: mh-alias-add-address-under-point
mh-alias-add-address-under-point is an interactive and byte-compiled
function defined in mh-alias.el.gz.
Signature
(mh-alias-add-address-under-point)
Documentation
Insert an alias for address under point.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/mh-e/mh-alias.el.gz
(defun mh-alias-add-address-under-point ()
"Insert an alias for address under point."
(interactive)
(let ((address (goto-address-find-address-at-point)))
(if address
(mh-alias-add-alias nil address)
(message "No email address found under point"))))