[Misc] Move configuration for ‘mm-decode’ to init.el
This commit is contained in:
parent
56d085d4f1
commit
3273407baa
18
gnus.el
18
gnus.el
|
@ -299,11 +299,6 @@ parameters for one particular email address."
|
||||||
;;; MIME
|
;;; MIME
|
||||||
|
|
||||||
(setq gnus-ignored-mime-types '("text/x-vcard")
|
(setq gnus-ignored-mime-types '("text/x-vcard")
|
||||||
mm-discouraged-alternatives '("text/richtext" "text/html")
|
|
||||||
mm-automatic-display (-difference mm-automatic-display
|
|
||||||
'("text/html"
|
|
||||||
"text/enriched"
|
|
||||||
"text/richtext"))
|
|
||||||
message-forward-as-mime t
|
message-forward-as-mime t
|
||||||
gnus-inhibit-mime-unbuttonizing nil
|
gnus-inhibit-mime-unbuttonizing nil
|
||||||
gnus-buttonized-mime-types '("multipart/signed" "multipart/encrypted")
|
gnus-buttonized-mime-types '("multipart/signed" "multipart/encrypted")
|
||||||
|
@ -316,19 +311,6 @@ parameters for one particular email address."
|
||||||
(insert "ghItlhpu' " (mail-header-from message-reply-headers) ":")
|
(insert "ghItlhpu' " (mail-header-from message-reply-headers) ":")
|
||||||
(newline))))
|
(newline))))
|
||||||
|
|
||||||
(use-package mm-decode
|
|
||||||
:config (progn
|
|
||||||
;; Tells Gnus to inline the part
|
|
||||||
(add-to-list 'mm-inlined-types "application/pgp$")
|
|
||||||
;; Tells Gnus how to display the part when it is requested
|
|
||||||
(add-to-list 'mm-inline-media-tests
|
|
||||||
'("application/pgp$" mm-inline-text identity))
|
|
||||||
;; Tell Gnus not to wait for a request, just display the thing
|
|
||||||
;; straight away.
|
|
||||||
(add-to-list 'mm-automatic-display "application/pgp$")
|
|
||||||
|
|
||||||
(setq mm-text-html-renderer 'shr)))
|
|
||||||
|
|
||||||
|
|
||||||
;;; Signing and Encryption
|
;;; Signing and Encryption
|
||||||
|
|
||||||
|
|
17
init.el
17
init.el
|
@ -1224,6 +1224,23 @@
|
||||||
(bbdb-initialize 'gnus 'message)
|
(bbdb-initialize 'gnus 'message)
|
||||||
(bbdb-mua-auto-update-init 'message)))
|
(bbdb-mua-auto-update-init 'message)))
|
||||||
|
|
||||||
|
(use-package mm-decode
|
||||||
|
:init (setq mm-text-html-renderer 'shr
|
||||||
|
mm-discouraged-alternatives '("text/richtext" "text/html")
|
||||||
|
mm-automatic-display (-difference mm-automatic-display
|
||||||
|
'("text/html"
|
||||||
|
"text/enriched"
|
||||||
|
"text/richtext")))
|
||||||
|
:config (progn
|
||||||
|
;; Tells Gnus to inline the PGP data
|
||||||
|
(add-to-list 'mm-inlined-types "application/pgp$")
|
||||||
|
;; Tells Gnus how to display PGP data when it is requested
|
||||||
|
(add-to-list 'mm-inline-media-tests
|
||||||
|
'("application/pgp$" mm-inline-text identity))
|
||||||
|
;; Tell Gnus not to wait for a request, just display PGP data
|
||||||
|
;; straight away.
|
||||||
|
(add-to-list 'mm-automatic-display "application/pgp$")))
|
||||||
|
|
||||||
(use-package mm-view
|
(use-package mm-view
|
||||||
:config (progn
|
:config (progn
|
||||||
;; Fix: mm-view does not seem to support verifying S/MIME messages
|
;; Fix: mm-view does not seem to support verifying S/MIME messages
|
||||||
|
|
Loading…
Reference in New Issue