Revert "When creating cal-period, ensure months for periods."

This reverts commit 488499cf23.
This commit is contained in:
Dominik Pantůček 2024-09-10 18:54:55 +02:00
parent 488499cf23
commit f95f7a0543

View file

@ -138,10 +138,7 @@
(not (null? (cdr args))))
(cadr args)
#f)))
(list TAG-CAL-PERIOD
(if since (cal-ensure-month since) since)
(if before (cal-ensure-month before) before)
scomment bcomment)))
(list TAG-CAL-PERIOD since before scomment bcomment)))
;; Simple accessors
(define cal-period-since cadr)