Function: gnus-registry-extract-addresses

gnus-registry-extract-addresses is a byte-compiled function defined in gnus-registry.el.gz.

Signature

(gnus-registry-extract-addresses TEXT)

Documentation

Extract all the addresses in a normalized way from TEXT.

Returns an unsorted list of strings in the name <address> format. Addresses without a name will say "noname".

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-registry.el.gz
(defun gnus-registry-extract-addresses (text)
  "Extract all the addresses in a normalized way from TEXT.
Returns an unsorted list of strings in the name <address> format.
Addresses without a name will say \"noname\"."
  (mapcar (lambda (add)
            (gnus-string-remove-all-properties
             (let* ((name (or (nth 0 add) "noname"))
                    (addr (nth 1 add))
                    (addr (if (bufferp addr)
                              (with-current-buffer addr
                                (buffer-string))
                            addr)))
               (format "%s <%s>" name addr))))
          (mail-extract-address-components text t)))