import batch next

This commit is contained in:
Bryce Covert
2021-12-22 21:47:37 -08:00
parent 7489426ccb
commit 58fd014082
6 changed files with 75 additions and 55 deletions

View File

@@ -57,7 +57,6 @@
(def is-year-month-day #"^\d{4}-\d{2}-\d{2}$")
(defn dates->date-times [x]
(walk/postwalk
(fn [node]
@@ -65,7 +64,7 @@
(and (string? node)
(re-matches is-8601 node))
(format/parse (format/formatters :date-time) node)
(time/to-default-time-zone (format/parse (format/formatters :date-time) node))
(and (string? node)
(re-matches is-year-month-day node))