Regular predicates.

This commit is contained in:
Dominik Pantůček 2023-04-11 22:32:07 +02:00
parent bf2b8ef23a
commit 4bd6837e08
6 changed files with 51 additions and 51 deletions

View file

@ -84,7 +84,7 @@
(loop (month-add cm)
(cons (list cm
(parameterize ((*current-month* cm))
(member-flags mr)))
(brmember-flags mr)))
cal))))))
;; Returns the first month of the calendar