Function: sc-attribs-%@-addresses

sc-attribs-%@-addresses is a byte-compiled function defined in supercite.el.gz.

Signature

(sc-attribs-%@-addresses FROM &optional DELIM)

Documentation

Extract the author's email terminus from email address FROM.

Match addresses of the style "name%[stuff]." when called with DELIM of "%" and addresses of the style "[stuff]name@[stuff]" when called with DELIM "@". If DELIM is nil or not provided, matches addresses of the style "name".

Source Code

;; Defined in /usr/src/emacs/lisp/mail/supercite.el.gz
(defun sc-attribs-%@-addresses (from &optional delim)
  "Extract the author's email terminus from email address FROM.
Match addresses of the style \"name%[stuff].\" when called with DELIM
of \"%\" and addresses of the style \"[stuff]name@[stuff]\" when
called with DELIM \"@\".  If DELIM is nil or not provided, matches
addresses of the style \"name\"."
  (and (string-match (concat "[-[:alnum:]_.]+" delim) from 0)
       (substring from
		  (match-beginning 0)
		  (- (match-end 0) (if (null delim) 0 1)))))