From 8d06dfce175593aebae9a759c9167df4988a3444 Mon Sep 17 00:00:00 2001 From: Jelle Licht Date: Tue, 19 Mar 2024 22:31:00 +0100 Subject: [PATCH] emacs: Autoload notmuch-user-agent related functions With this change, users with mail-user-agent set to 'notmuch-user-agent can start composing emails without having to require 'notmuch-mua first. --- emacs/notmuch-mua.el | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/emacs/notmuch-mua.el b/emacs/notmuch-mua.el index e4b7e9d1..bf62b656 100644 --- a/emacs/notmuch-mua.el +++ b/emacs/notmuch-mua.el @@ -401,6 +401,7 @@ instead of `message-mode' and SWITCH-FUNCTION is mandatory." (addr (and good-tokens (mapconcat #'identity good-tokens ", ")))) (message-replace-header header addr)))))) +;;;#autoload (defun notmuch-mua-mail (&optional to subject other-headers _continue switch-function yank-action send-actions return-action &rest _ignored) @@ -622,20 +623,24 @@ unencrypted. Really send? ")))) (message-send-and-exit arg) (message-send arg))))) +;;;#autoload (defun notmuch-mua-send-and-exit (&optional arg) (interactive "P") (notmuch-mua-send-common arg t)) +;;;#autoload (defun notmuch-mua-send (&optional arg) (interactive "P") (notmuch-mua-send-common arg)) +;;;#autoload (defun notmuch-mua-kill-buffer () (interactive) (message-kill-buffer)) ;;; _ +;;;#autoload (define-mail-user-agent 'notmuch-user-agent 'notmuch-mua-mail 'notmuch-mua-send-and-exit