Function: mailclient-gather-addresses

mailclient-gather-addresses is a byte-compiled function defined in mailclient.el.gz.

Signature

(mailclient-gather-addresses STR &optional DROP-FIRST-NAME)

Source Code

;; Defined in /usr/src/emacs/lisp/mail/mailclient.el.gz
(defun mailclient-gather-addresses (str &optional drop-first-name)
  (let ((field (mail-fetch-field str nil t)))
    (if field
	(save-excursion
	  (let ((first t)
		(result ""))
	    (mapc
	     (lambda (recp)
	       (setq result
		     (concat
		      result
		      (if (and drop-first-name
			       first)
			  ""
			(concat (mailclient-url-delim) str "="))
		      (mailclient-encode-string-as-url
		       recp)))
	       (setq first nil))
	     (split-string
	      (mail-strip-quoted-names field) ", *"))
	    result)))))