Edit some email stuff

This commit is contained in:
2026-02-20 07:47:47 -08:00
parent eca7942215
commit b26ff9e735
2 changed files with 74 additions and 56 deletions

70
init.el
View File

@ -2352,6 +2352,14 @@ Note that this erases the buffer before doing anything."
(advice-add 'jupyter-org--set-src-block-cache :around
#'my/-fix-jupyter-org--set-src-block-cache)
;; prevent warning in `execute-extended-command'
(defun my/-fix-jupyter-org--define-key-filter (oldfun &rest args)
"Prevent calling `jupyter-org--define-key-filter' outside of `org-mode'."
(when (derived-mode-p 'org-mode)
(apply oldfun args)))
(advice-add 'jupyter-org--define-key-filter :around
#'my/-fix-jupyter-org--define-key-filter)
(face-spec-set 'jupyter-repl-traceback
'((default . (:background unspecified)))
'face-override-spec)
@ -3317,30 +3325,44 @@ This will also update waybar."
;; mu4e compose HTML messages
(use-package org-mime)
(require 'org-mu4e-compose)
(setq ;; mail-user-agent 'org-mu4e-user-agent
org-mime-org-html-with-latex-default 'dvisvgm
org-mime-export-options '(:with-latex dvisvgm :with-footnotes t))
;; (evil-define-key '(normal visual) org-mu4e-compose-mode-map
;; "G" #'mu4e-compose-goto-bottom
;; "gg" #'mu4e-compose-goto-top)
;; (evil-define-key 'normal org-mu4e-compose-mode-map
;; "ZZ" #'message-send-and-exit
;; "ZD" #'message-dont-send
;; "ZQ" #'message-kill-buffer
;; "ZF" #'mml-attach-file)
;; (evil-define-key 'normal mu4e-view-mode-map
;; "R" 'org-mu4e-compose-reply
;; "cr" 'org-mu4e-compose-reply)
;; (evil-define-key 'normal mu4e-headers-mode-map
;; "R" 'org-mu4e-compose-reply
;; "cr" 'org-mu4e-compose-reply)
;; (defun my/-setup-org-mu4e-compose-mode ()
;; "Setup up stuff in `org-mu4e-compose' buffers."
;; (setq-local ltex-eglot-variable-save-method 'file)
;; ;; this should come last so it can pick up the above
;; ;; (my/eglot-if-trusted)
;; )
;; (add-hook 'org-mu4e-compose-mode-hook #'my/-setup-org-mu4e-compose-mode)
(setq mail-user-agent 'org-mu4e-user-agent
org-mime-org-html-with-latex-default 'dvisvgm
org-mime-export-options '(:with-latex dvisvgm :with-footnotes t))
(evil-define-key '(normal visual) org-mu4e-compose-mode-map
"G" #'mu4e-compose-goto-bottom
"gg" #'mu4e-compose-goto-top)
(evil-define-key 'normal org-mu4e-compose-mode-map
"ZZ" #'message-send-and-exit
"ZD" #'message-dont-send
"ZQ" #'message-kill-buffer
"ZF" #'mml-attach-file)
(evil-define-key 'normal mu4e-view-mode-map
"R" #'org-mu4e-compose-reply
"cr" #'org-mu4e-compose-reply
"ce" #'org-mu4e-compose-edit)
(evil-define-key 'normal mu4e-headers-mode-map
"R" #'org-mu4e-compose-reply
"cr" #'org-mu4e-compose-reply
"E" #'org-mu4e-compose-edit
"ce" #'org-mu4e-compose-edit)
(evil-define-key 'normal mu4e-main-mode-map
"C" #'compose-mail
"cc" #'compose-mail)
(defun my/-setup-org-mu4e-compose-mode ()
"Setup up stuff in `org-mu4e-compose' buffers."
(setq-local ltex-eglot-variable-save-method 'file)
;; this should come last so it can pick up the above
;; (my/eglot-if-trusted)
)
(add-hook 'org-mu4e-compose-mode-hook #'my/-setup-org-mu4e-compose-mode)
(setopt mu4e-compose-switch 'display-buffer)
(defun my/-match-mu4e-message-buffer (buffer _action)
"Matcher for mu4e message buffers for `display-buffer-alist'.
BUFFER is the buffer-or-string to match against."
(provided-mode-derived-p (buffer-local-value 'major-mode (get-buffer buffer))
'mu4e-compose-mode))
(add-to-list 'display-buffer-alist
'(my/-match-mu4e-message-buffer . (display-buffer-same-window)))
;; elfeed
(use-package elfeed