summaryrefslogtreecommitdiff
path: root/test/lisp
diff options
context:
space:
mode:
authorUlf Jasper <ulf.jasper@web.de>2020-09-02 19:58:56 +0200
committerUlf Jasper <ulf.jasper@web.de>2020-09-02 19:58:56 +0200
commitc5e8254b9c89ac866df057fa3acd2dc44e3989ae (patch)
tree8ee5456228a0442ae74c0e72ccfe437578d68168 /test/lisp
parente381c2f7f07e207901d4cffa4144fcba27f8d7aa (diff)
downloademacs-c5e8254b9c89ac866df057fa3acd2dc44e3989ae.tar.gz
Apply icalendar.el patch by Thomas Plass <thunk2@arcor.de>. Fix bug#34315.
* lisp/calendar/icalendar.el (icalendar--convert-tz-offset): No DST when RDATE is present. * lisp/calendar/icalendar.el (icalendar--parse-vtimezone): Use `icalendar--get-most-recent-observance'. * (icalendar--get-most-recent-observance): New. * (icalendar--decode-isodatetime): Add parameters source-zone, result-zone. * (icalendar--decode-isoduration): Fix decoding days. * test/lisp/calendar/icalendar-tests.el (icalendar--decode-isoduration): Add testcases.
Diffstat (limited to 'test/lisp')
-rw-r--r--test/lisp/calendar/icalendar-tests.el18
1 files changed, 9 insertions, 9 deletions
diff --git a/test/lisp/calendar/icalendar-tests.el b/test/lisp/calendar/icalendar-tests.el
index 2beab614c87..bce7de769e0 100644
--- a/test/lisp/calendar/icalendar-tests.el
+++ b/test/lisp/calendar/icalendar-tests.el
@@ -590,25 +590,25 @@ END:VEVENT
(should (equal '(0 0 0 7 0 0)
(icalendar--decode-isoduration "P7D")))
- ;; testcase: 7 days, one second -- to be fixed with bug#34315
- ;; (should (equal '(1 0 0 7 0 0)
- ;; (icalendar--decode-isoduration "P7DT1S")))
+ ;; testcase: 7 days, one second -- see bug#34315
+ (should (equal '(1 0 0 7 0 0)
+ (icalendar--decode-isoduration "P7DT1S")))
;; testcase: 3 hours, 2 minutes, one second
(should (equal '(1 2 3 0 0 0)
(icalendar--decode-isoduration "PT3H2M1S")))
- ;; testcase: 99 days, 3 hours, 2 minutes, one second -- to be fixed with bug#34315
- ;; (should (equal '(1 2 3 99 0 0)
- ;; (icalendar--decode-isoduration "P99DT3H2M1S")))
+ ;; testcase: 99 days, 3 hours, 2 minutes, one second -- see bug#34315
+ (should (equal '(1 2 3 99 0 0)
+ (icalendar--decode-isoduration "P99DT3H2M1S")))
;; testcase: 2 weeks
(should (equal '(0 0 0 14 0 0)
(icalendar--decode-isoduration "P2W")))
- ;; testcase: rfc2445, section 4.3.6: 15 days, 5 hours and 20 seconds -- to be fixed with bug#34315
- ;; (should (equal '(20 0 5 15 0 0)
- ;; (icalendar--decode-isoduration "P15DT5H0M20S")))
+ ;; testcase: rfc2445, section 4.3.6: 15 days, 5 hours and 20 seconds -- see bug#34315
+ (should (equal '(20 0 5 15 0 0)
+ (icalendar--decode-isoduration "P15DT5H0M20S")))
;; testcase: rfc2445, section 4.3.6: 7 weeks
(should (equal '(0 0 0 49 0 0)