From: Amin Bandali Date: Sun, 25 Dec 2022 05:53:27 +0000 (-0500) Subject: * .emacs.d/lisp/bandali-gnus.el: Decode application/gzip attachments. X-Git-Url: https://git.shemshak.org/~bandali/configs/commitdiff_plain/05d1c1ac3b62f9b991f5fc11369715c52311d9f1?ds=sidebyside * .emacs.d/lisp/bandali-gnus.el: Decode application/gzip attachments. --- diff --git a/.emacs.d/lisp/bandali-gnus.el b/.emacs.d/lisp/bandali-gnus.el index f4e44e6..2ca03e4 100644 --- a/.emacs.d/lisp/bandali-gnus.el +++ b/.emacs.d/lisp/bandali-gnus.el @@ -379,13 +379,22 @@ (with-eval-after-load 'gnus-dired (add-hook 'dired-mode-hook 'gnus-dired-mode)) +(with-eval-after-load 'mm-archive + (add-to-list + 'mm-archive-decoders + '("application/gzip" nil "gunzip" "-S" ".zip" "-kd" "%f" "-r"))) + (with-eval-after-load 'mm-decode (setq ;; mm-attachment-override-types `("text/x-diff" "text/x-patch" ;; ,@mm-attachment-override-types) mm-discouraged-alternatives '("text/html" "text/richtext") mm-decrypt-option 'known - mm-verify-option 'known)) + mm-verify-option 'known) + (add-to-list + 'mm-inline-media-tests + `("application/gzip" mm-archive-dissect-and-inline identity)) + (add-to-list 'mm-inlined-types "application/gzip" 'append)) (with-eval-after-load 'mm-uu (when (version< "27" emacs-version)