generalize notmuch/ivy-compose to notmuch/compose (completing-read)
This commit is contained in:
parent
e279409bbd
commit
a4050a153d
1 changed files with 5 additions and 4 deletions
|
@ -87,12 +87,13 @@
|
|||
(notmuch-tree-next-message))
|
||||
|
||||
;;;###autoload
|
||||
(defun +notmuch/ivy-compose ()
|
||||
(defun +notmuch/compose ()
|
||||
"Compose new mail"
|
||||
(interactive)
|
||||
(ivy-read "From: "
|
||||
(notmuch-user-emails)
|
||||
:action (lambda (selection) (notmuch-mua-mail nil nil (list (cons 'From selection))))))
|
||||
(notmuch-mua-mail
|
||||
nil
|
||||
nil
|
||||
(list (cons 'From (completing-read "From: " (notmuch-user-emails))))))
|
||||
|
||||
;;;###autoload
|
||||
(defun +notmuch/open-message-with-mail-app-notmuch-tree ()
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue