summaryrefslogtreecommitdiff
path: root/gnus-icalendar-request-tests.el
diff options
context:
space:
mode:
authorfpi2024-09-16 10:55:42 +0200
committerfpi2024-09-16 10:55:42 +0200
commit7f1b8c3142d9c7fab3099e36b04d115c9a11dbda (patch)
treefd5e3a189c5e7e1cc4bd00cad3d7b788a7f164c9 /gnus-icalendar-request-tests.el
parentRemove VTIMEZONE component (diff)
Update PRODID
Diffstat (limited to '')
-rw-r--r--gnus-icalendar-request-tests.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/gnus-icalendar-request-tests.el b/gnus-icalendar-request-tests.el
index c9eab69..09d8198 100644
--- a/gnus-icalendar-request-tests.el
+++ b/gnus-icalendar-request-tests.el
@@ -48,11 +48,13 @@ SEQUENCE:0
END:VEVENT"))
(setenv "TZ" "CET-1CEST,M3.5.0/2,M10.5.0/3")
(let ((vcalendar (gnus-icalendar--build-vcalendar-from-vevent event)))
- ;; Ensure there is exactly one of version and prodid
+ ;; Ensure there is exactly one of VERSION and PRODID
(should (string-match "^VERSION:2.0\\(\n\\|.\\)*END:VCALENDAR" vcalendar))
(should-not (string-match "^VERSION:" (match-string 1 vcalendar)))
(should (string-match "^PRODID:\\(\n\\|.\\)*END:VCALENDAR" vcalendar))
(should-not (string-match "^PRODID:" (match-string 1 vcalendar)))
+ ;; METHOD should be REQUEST
+ (should (string-match "^METHOD:REQUEST$" vcalendar))
;; Ensure the vevent remains intact
(should (string-match "^\\(BEGIN:VEVENT\\(\n\\|.\\)*\nEND:VEVENT\\)" vcalendar))
(should (string-match (match-string 1 vcalendar) event)))