emacs
/
mu
mirror of https://github.com/djcb/mu.git
1
0
Fork 0
Code Issues Releases Wiki Activity

mu4e/icalendar: Use a closure to trash the original message 

This work around the fact that `defun' has an undefined return value.
This commit is contained in:
Christophe Troestler 2021-03-17 00:34:04 +01:00
parent 2d67b66506
commit 1c9e1f4be1
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
mu4e/mu4e-icalendar.el
View File

@ -140,6 +140,10 @@
(or (mu4e-view-headers-next)
(kill-buffer-and-window))))))
(defun mu4e~icalendar-trash-message-hook (original-msg)
(lambda () (setq mu4e-sent-func
(mu4e~icalendar-trash-message original-msg))))
(defun mu4e-icalendar-reply-ical (original-msg event status buffer-name)
"Reply to ORIGINAL-MSG containing invitation EVENT with STATUS.
See `gnus-icalendar-event-reply-from-buffer' for the possible
@ -171,9 +175,8 @@ response in icalendar format."
;; also trash the message (thus must be appended to hooks).
(add-hook
'message-sent-hook
(defun mu4e~icalendar-trash-hook()
(setq mu4e-sent-func (mu4e~icalendar-trash-message original-msg)))
t t))))
(mu4e~icalendar-trash-message-hook original-msg)
90 t))))
(defun mu4e~icalendar-insert-diary (event reply-status filename)
"Insert a diary entry for the EVENT in file named FILENAME.