From c846b2cea042ac3666d340305f46325cde68d674 Mon Sep 17 00:00:00 2001 From: Yuchen Pei Date: Wed, 18 Oct 2023 11:04:04 +1100 Subject: [emacs] Some minor fixes gnus: prefers plaintext my-buffer: fixes a bug my-org: fixing a local var --- emacs/.emacs.d/init/ycp-gnus.el | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'emacs/.emacs.d/init') diff --git a/emacs/.emacs.d/init/ycp-gnus.el b/emacs/.emacs.d/init/ycp-gnus.el index e4e24a4..f344cfc 100644 --- a/emacs/.emacs.d/init/ycp-gnus.el +++ b/emacs/.emacs.d/init/ycp-gnus.el @@ -35,6 +35,9 @@ (setq mm-encrypt-option nil ; use 'guided if you need more control mm-sign-option nil)) ; same +(my-package mm-decode + (setq mm-discouraged-alternatives '("text/html" "text/richtext"))) + ;;; `mml-sec' (my-package mml-sec (setq mml-secure-openpgp-encrypt-to-self t @@ -181,12 +184,15 @@ (setq gnus-treat-display-smileys nil) (setq gnus-article-x-face-too-ugly ".*") (my-keybind gnus-article-mode-map - "M-w" #'my-gnus-article-copy-region)) + "M-w" #'my-gnus-article-copy-region) + (setq gnus-visible-headers + "^From:\\|^Newsgroups:\\|^Subject:\\|^Date:\\|^Followup-To:\\|^Reply-To:\\|^Organization:\\|^Summary:\\|^Keywords:\\|^To:\\|^[BGF]?Cc:\\|^Posted-To:\\|^Mail-Copies-To:\\|^Mail-Followup-To:\\|^Apparently-To:\\|^Gnus-Warning:\\|^Resent-From:\\|^In-Reply-To")) ;;; gnus-desktop-notify (my-package gnus-desktop-notify (:delay 30) (gnus-desktop-notify-mode) (setq gnus-desktop-notify-groups 'gnus-desktop-notify-explicit) + (setq gnus-desktop-notify-uncollapsed-levels 2) ) (my-package gnus-demon -- cgit v1.2.3