Function: mail-sentto-newsgroups

mail-sentto-newsgroups is a byte-compiled function defined in mailalias.el.gz.

Signature

(mail-sentto-newsgroups)

Documentation

Return all entries from Newsgroups: header as completion alist.

Source Code

;; Defined in /usr/src/emacs/lisp/mail/mailalias.el.gz
(defun mail-sentto-newsgroups ()
  "Return all entries from Newsgroups: header as completion alist."
  (save-excursion
    (if (mail-position-on-field "newsgroups" t)
	(let ((point (point))
	      list)
	  (while (< (skip-chars-backward "^:, \t\n") 0)
	    (setq list `((,(buffer-substring (point) point))
			 ,@list))
	    (skip-chars-backward ", \t\n")
	    (setq point (point)))
	  list))))