useless list

This commit is contained in:
Mattias Engdegård 2026-03-02 15:01:04 +01:00
parent 3b32f85139
commit f52b42e45d

View file

@ -999,9 +999,8 @@ recurrences will be local to that time zone."
(weekstart (ical:recur-weekstart recur-value))
(subintervals (list interval)))
(dolist (byunit (list 'BYMONTH 'BYWEEKNO
'BYYEARDAY 'BYMONTHDAY 'BYDAY
'BYHOUR 'BYMINUTE 'BYSECOND))
(dolist (byunit '( BYMONTH BYWEEKNO BYYEARDAY BYMONTHDAY BYDAY
BYHOUR BYMINUTE BYSECOND))
(let ((values (ical:recur-by* byunit recur-value))
(in-month nil))
;; When there is no explicit BY* clause, use the value implicit