diff options
| author | Craig Jennings <c@cjennings.net> | 2025-12-02 07:55:21 -0600 |
|---|---|---|
| committer | Craig Jennings <c@cjennings.net> | 2025-12-02 07:55:21 -0600 |
| commit | 703bc366cf8439a398362d98bef513ef98942fd4 (patch) | |
| tree | 570e67b7915d50c0831c3ce74ddfee873151b6d0 /tests/test-calendar-sync--expand-weekly.el | |
| parent | cc3f4fd917f5387df68cd987acf591762a94025b (diff) | |
| download | dotemacs-703bc366cf8439a398362d98bef513ef98942fd4.tar.gz dotemacs-703bc366cf8439a398362d98bef513ef98942fd4.zip | |
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.
Diffstat (limited to 'tests/test-calendar-sync--expand-weekly.el')
| -rw-r--r-- | tests/test-calendar-sync--expand-weekly.el | 6 |
1 files changed, 4 insertions, 2 deletions
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)) |
