diff options
| author | Jelle Licht <jlicht@fsfe.org> | 2024-03-19 22:31:00 +0100 |
|---|---|---|
| committer | David Bremner <david@tethera.net> | 2024-04-04 08:20:51 -0300 |
| commit | 8d06dfce175593aebae9a759c9167df4988a3444 (patch) | |
| tree | 6bc84f6b8deb586dcfa83c294cd31bc7849492a0 | |
| parent | d1ba5d63421557346b3f135823068e3ac38b89fa (diff) | |
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.
| -rw-r--r-- | emacs/notmuch-mua.el | 5 |
1 files changed, 5 insertions, 0 deletions
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 |