From fac78a8fc92b27c37e678ee70824eb5f70ceee8b Mon Sep 17 00:00:00 2001 From: Craig Jennings Date: Tue, 2 Dec 2025 07:55:21 -0600 Subject: feat(calendar-sync): multi-calendar support with property tests Added multi-URL calendar sync supporting Google and Proton calendars. Each calendar syncs to separate file with per-calendar state tracking. Added 13 property-based tests for RRULE expansion. Total: 150 tests passing. --- tests/test-calendar-sync--expand-weekly.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'tests/test-calendar-sync--expand-weekly.el') diff --git a/tests/test-calendar-sync--expand-weekly.el b/tests/test-calendar-sync--expand-weekly.el index e4e5b738..fe333c98 100644 --- a/tests/test-calendar-sync--expand-weekly.el +++ b/tests/test-calendar-sync--expand-weekly.el @@ -122,7 +122,8 @@ (unwind-protect (let* ((start-date (test-calendar-sync-time-days-from-now 1 10 0)) (end-date (test-calendar-sync-time-days-from-now 1 11 0)) - (until-date (test-calendar-sync-time-days-from-now 60 0 0)) + ;; UNTIL must be date-only (3 elements) for calendar-sync--before-date-p + (until-date (test-calendar-sync-time-date-only 60)) (base-event (list :summary "Time-Limited Event" :start start-date :end end-date)) @@ -253,7 +254,8 @@ (unwind-protect (let* ((start-date (test-calendar-sync-time-days-ago 100 10 0)) (end-date (test-calendar-sync-time-days-ago 100 11 0)) - (until-date (test-calendar-sync-time-days-ago 50 0 0)) + ;; UNTIL must be date-only (3 elements) for calendar-sync--before-date-p + (until-date (test-calendar-sync-time-date-only-ago 50)) (base-event (list :summary "Past Event" :start start-date :end end-date)) -- cgit v1.2.3