From 280beaff23cd351d9ba11f1025ec407ecb065072 Mon Sep 17 00:00:00 2001 From: ShengHuo ZHU Date: Mon, 7 Jan 2002 19:28:42 +0000 Subject: [PATCH] * gnus-art.el (gnus-header-button-alist): Handle mailto. --- lisp/ChangeLog | 2 ++ lisp/gnus-art.el | 1 + 2 files changed, 3 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d909612a1..906fdeaa4 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2002-01-07 ShengHuo ZHU + * gnus-art.el (gnus-header-button-alist): Handle mailto. + * mml.el (mml-preview): Bind gnus-original-article-buffer because article-decode-group-name uses it. Bind gnus-article-prepare-hook because bbdb may use it. diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el index 3b4058715..fe87893d2 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -5097,6 +5097,7 @@ variable it the real callback function." ("^X-[Uu][Rr][Ll]:" ,gnus-button-url-regexp 0 t browse-url 0) ("^Subject:" ,gnus-button-url-regexp 0 t browse-url 0) ("^[^:]+:" ,gnus-button-url-regexp 0 t browse-url 0) + ("^[^:]+:" "\\bmailto:\\([-a-zA-Z.@_+0-9%=?]+\\)" 0 t gnus-url-mailto 1) ("^[^:]+:" "\\(<\\(url: \\)?news:\\([^>\n ]*\\)>\\)" 1 t gnus-button-message-id 3)) "*Alist of headers and regexps to match buttons in article heads. -- 2.25.1