summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSacha Chua <sacha@sachachua.com>2022-10-31 14:39:07 -0400
committerSacha Chua <sacha@sachachua.com>2022-10-31 14:39:07 -0400
commit28d262b46a3abf43864e4e574cd60ed59af6d3a8 (patch)
tree81130acc18003196627257412cac1f3c1749c88c
parent4b0c3d02c24132dec0af2d5f57a04f5209cddbd6 (diff)
downloademacsconf-el-28d262b46a3abf43864e4e574cd60ed59af6d3a8.tar.xz
emacsconf-el-28d262b46a3abf43864e4e574cd60ed59af6d3a8.zip
Make it easier to mail speakers
-rw-r--r--emacsconf-mail.el4
1 files changed, 2 insertions, 2 deletions
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)