summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--mu4e/mu4e-icalendar.el8
1 files changed, 5 insertions, 3 deletions
diff --git a/mu4e/mu4e-icalendar.el b/mu4e/mu4e-icalendar.el
index 3bc0921..fc7cb52 100644
--- a/mu4e/mu4e-icalendar.el
+++ b/mu4e/mu4e-icalendar.el
@@ -24,9 +24,11 @@
((event gnus-icalendar-event) handle)
(if (and (boundp 'mu4e~view-rendering)
(gnus-icalendar-event:rsvp event))
- `(("Accept" mu4e-icalendar-reply (,handle accepted ,event))
- ("Tentative" mu4e-icalendar-reply (,handle tentative ,event))
- ("Decline" mu4e-icalendar-reply (,handle declined ,event)))
+ (let ((method (gnus-icalendar-event:method event)))
+ (when (or (string= method "REQUEST") (string= method "PUBLISH"))
+ `(("Accept" mu4e-icalendar-reply (,handle accepted ,event))
+ ("Tentative" mu4e-icalendar-reply (,handle tentative ,event))
+ ("Decline" mu4e-icalendar-reply (,handle declined ,event)))))
(cl-call-next-method event handle))))
(defun mu4e-icalendar-reply (data)