From: Reiner Steib Date: Wed, 26 Apr 2006 12:31:41 +0000 (+0000) Subject: * mm-decode.el (mm-verify-option): Add gnus-buttonized-mime-types X-Git-Url: http://cgit.sxemacs.org/?a=commitdiff_plain;ds=sidebyside;h=7e30203e1ef7b6192a43333c17cdc7033e21f4e8;p=gnus * mm-decode.el (mm-verify-option): Add gnus-buttonized-mime-types to doc string. * gnus-art.el (gnus-buttonized-mime-types): Add "multipart/signed" depending on mm-verify-option. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index de9adfac0..5e2875fb1 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,11 @@ +2006-04-26 Reiner Steib + + * mm-decode.el (mm-verify-option): Add gnus-buttonized-mime-types + to doc string. + + * gnus-art.el (gnus-buttonized-mime-types): Add "multipart/signed" + depending on mm-verify-option. + 2006-04-25 Katsumi Yamaoka * message.el (message-self-insert-commands): Doc fix. diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el index b450d980a..ec1cf490f 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -870,7 +870,8 @@ This variable is only used when `gnus-inhibit-mime-unbuttonizing' is nil." :group 'gnus-article-mime :type '(repeat regexp)) -(defcustom gnus-buttonized-mime-types nil +(defcustom gnus-buttonized-mime-types (unless (eq mm-verify-option 'never) + '("multipart/signed")) "List of MIME types that should be given buttons when rendered inline. If set, this variable overrides `gnus-unbuttonized-mime-types'. To see e.g. security buttons you could set this to diff --git a/lisp/mm-decode.el b/lisp/mm-decode.el index b3f976b3c..c9c6beb73 100644 --- a/lisp/mm-decode.el +++ b/lisp/mm-decode.el @@ -436,7 +436,11 @@ If not set, `default-directory' will be used." (defcustom mm-verify-option 'never "Option of verifying signed parts. `never', not verify; `always', always verify; -`known', only verify known protocols. Otherwise, ask user." +`known', only verify known protocols. Otherwise, ask user. + +When set to `always' or `known', you should add +\"multipart/signed\" to `gnus-buttonized-mime-types' to see +result of the verification." :version "22.1" :type '(choice (item always) (item never)