Function: gnus-mailing-list-archive

gnus-mailing-list-archive is an interactive and byte-compiled function defined in gnus-ml.el.gz.

Signature

(gnus-mailing-list-archive)

Documentation

Browse archive.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-ml.el.gz
(defun gnus-mailing-list-archive ()
  "Browse archive."
  (interactive)
  (require 'browse-url)
  (let ((list-archive
	 (with-current-buffer gnus-original-article-buffer
	   (gnus-fetch-field "list-archive"))))
    (cond (list-archive
	   (if (string-match "<\\(https?:[^>]*\\)>" list-archive)
	       (browse-url (match-string 1 list-archive))
	     (browse-url list-archive)))
	  (t (gnus-message 1 "no list-archive in this group")))))