emacs: remap send-message and send-message-and-exit

All three of C-c C-c, <menu-bar> <Message> <Send Message>,
and <tool-bar> <Send Message> are bound to message-send-and-exit by
message.el, but notmuch-mua.el only had an explicit override for the
keyboard binding. This mostly manifests as confusing Fcc behaviour for
GUI users.

Patching the bindings for specific keys is rather brittle, since it has
to be aware of every relevant binding. This change switches to instead
using a remap binding, which turns any binding for message-send or
message-send-and-exit into a binding for the corresponding notmuch-mua
command.
This commit is contained in:
edef 2021-06-13 08:23:58 +00:00 committed by David Bremner
parent 814abafc3e
commit fb4b45062f

View file

@ -341,8 +341,8 @@ Typically this is added to `notmuch-mua-send-hook'."
(defvar notmuch-message-mode-map
(let ((map (make-sparse-keymap)))
(define-key map (kbd "C-c C-c") #'notmuch-mua-send-and-exit)
(define-key map (kbd "C-c C-s") #'notmuch-mua-send)
(define-key map [remap message-send-and-exit] #'notmuch-mua-send-and-exit)
(define-key map [remap message-send] #'notmuch-mua-send)
(define-key map (kbd "C-c C-p") #'notmuch-draft-postpone)
(define-key map (kbd "C-x C-s") #'notmuch-draft-save)
map)