mu4e (ical): Display ical buttons only when method∈{REQUEST,PUBLISH}
This commit is contained in:
@ -24,9 +24,11 @@
|
|||||||
((event gnus-icalendar-event) handle)
|
((event gnus-icalendar-event) handle)
|
||||||
(if (and (boundp 'mu4e~view-rendering)
|
(if (and (boundp 'mu4e~view-rendering)
|
||||||
(gnus-icalendar-event:rsvp event))
|
(gnus-icalendar-event:rsvp event))
|
||||||
|
(let ((method (gnus-icalendar-event:method event)))
|
||||||
|
(when (or (string= method "REQUEST") (string= method "PUBLISH"))
|
||||||
`(("Accept" mu4e-icalendar-reply (,handle accepted ,event))
|
`(("Accept" mu4e-icalendar-reply (,handle accepted ,event))
|
||||||
("Tentative" mu4e-icalendar-reply (,handle tentative ,event))
|
("Tentative" mu4e-icalendar-reply (,handle tentative ,event))
|
||||||
("Decline" mu4e-icalendar-reply (,handle declined ,event)))
|
("Decline" mu4e-icalendar-reply (,handle declined ,event)))))
|
||||||
(cl-call-next-method event handle))))
|
(cl-call-next-method event handle))))
|
||||||
|
|
||||||
(defun mu4e-icalendar-reply (data)
|
(defun mu4e-icalendar-reply (data)
|
||||||
|
|||||||
Reference in New Issue
Block a user