From 28d262b46a3abf43864e4e574cd60ed59af6d3a8 Mon Sep 17 00:00:00 2001 From: Sacha Chua Date: Mon, 31 Oct 2022 14:39:07 -0400 Subject: Make it easier to mail speakers --- emacsconf-mail.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'emacsconf-mail.el') diff --git a/emacsconf-mail.el b/emacsconf-mail.el index 8322b1f..9bd8dcb 100644 --- a/emacsconf-mail.el +++ b/emacsconf-mail.el @@ -105,8 +105,8 @@ (defun emacsconf-mail-speaker (&optional subject body talk) "Compose a message to the speaker of the current talk." - (interactive) - (compose-mail (format "%s <%s>" (org-entry-get (point) "NAME") (org-entry-get (point) "EMAIL")) subject) + (interactive (list nil nil (emacsconf-complete-talk-info))) + (compose-mail (plist-get talk :email) subject) (when body (message-goto-body) (insert body))) (defun emacsconf-mail-speaker-schedule (&optional subject body) -- cgit v1.2.3