Regular predicates.
This commit is contained in:
parent
bf2b8ef23a
commit
4bd6837e08
6 changed files with 51 additions and 51 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue