one more saftey check

This commit is contained in:
Bryce
2024-04-09 14:24:21 -07:00
parent 8b9e617062
commit 10a60dcee2

View File

@@ -190,13 +190,17 @@
[:fn
{:error/message "Invalid date"}
(fn [d]
(time/after? (coerce/to-date-time d)
(coerce/to-date-time #inst "2000-01-01")))]
(if d
(time/after? (coerce/to-date-time d)
(coerce/to-date-time #inst "2000-01-01"))
true))]
[:fn
{:error/message "Invalid date"}
(fn [d]
(time/before? (coerce/to-date-time d)
(time/plus (time/now) (time/years 2))))]]))
(if d
(time/before? (coerce/to-date-time d)
(time/plus (time/now) (time/years 2)))
true))]]))
(def date-transformer
(mt2/transformer