From: yamaoka Date: Wed, 25 Feb 2004 13:52:53 +0000 (+0000) Subject: Synch to No Gnus 200402251344. X-Git-Tag: t-gnus-6_17_4-quimby-~1062 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=e96a278687928c927a2cf57ef86e5e58660806d3;p=elisp%2Fgnus.git- Synch to No Gnus 200402251344. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 77beac6..3d85e5b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2004-02-25 Reiner Steib + + * gnus-art.el (gnus-button-alist, gnus-header-button-alist): Allow + / in mailto URLs. + 2004-02-24 Reiner Steib * spam-report.el (spam-report-process-queue): Fix interactive use. diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el index 83d76d5..4f8d463 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -6565,7 +6565,7 @@ positives are possible." ("\\( \n\t]+\\)>" 0 (>= gnus-button-message-level 0) gnus-url-mailto 2) ;; RFC 2368 (The mailto URL scheme) - ("mailto:\\([-a-z.@_+0-9%=?&]+\\)" + ("\\bmailto:\\([-a-z.@_+0-9%=?&/]+\\)" 0 (>= gnus-button-message-level 0) gnus-url-mailto 1) ("\\bmailto:\\([^ \n\t]+\\)" 0 (>= gnus-button-message-level 0) gnus-url-mailto 1) @@ -6700,7 +6700,7 @@ variable it the real callback function." 0 (>= gnus-button-browse-level 0) browse-url 0) ("^[^:]+:" gnus-button-url-regexp 0 (>= gnus-button-browse-level 0) browse-url 0) - ("^[^:]+:" "\\bmailto:\\([-a-z.@_+0-9%=?&]+\\)" + ("^[^:]+:" "\\bmailto:\\([-a-z.@_+0-9%=?&/]+\\)" 0 (>= gnus-button-message-level 0) gnus-url-mailto 1) ("^[^:]+:" "\\(<\\(url: \\)?\\(nntp\\|news\\):\\([^>\n ]*\\)>\\)" 1 (>= gnus-button-message-level 0) gnus-button-message-id 4))