diff options
| author | Sacha Chua <sacha@sachachua.com> | 2022-10-31 14:39:07 -0400 |
|---|---|---|
| committer | Sacha Chua <sacha@sachachua.com> | 2022-10-31 14:39:07 -0400 |
| commit | 28d262b46a3abf43864e4e574cd60ed59af6d3a8 (patch) | |
| tree | 81130acc18003196627257412cac1f3c1749c88c | |
| parent | 4b0c3d02c24132dec0af2d5f57a04f5209cddbd6 (diff) | |
| download | emacsconf-el-28d262b46a3abf43864e4e574cd60ed59af6d3a8.tar.xz emacsconf-el-28d262b46a3abf43864e4e574cd60ed59af6d3a8.zip | |
Make it easier to mail speakers
| -rw-r--r-- | emacsconf-mail.el | 4 |
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) |