read dates as instants

This commit is contained in:
Henry Widd 2020-07-17 14:03:58 +01:00
parent 30e5d7c9ea
commit 406e5d3576

View file

@ -4,7 +4,7 @@
(java.util.concurrent TimeUnit)
(com.mongodb WriteConcern ReadPreference ReadConcern)
(clojure.lang Ratio Keyword Named IPersistentMap)
(java.util Collection List)
(java.util Collection List Date)
(org.bson.types Decimal128)))
(set! *warn-on-reflection* true)
@ -14,6 +14,12 @@
(defprotocol ConvertToDocument
(^Document document [input] "Convert from clojure to Mongo Document"))
(defn read-dates-as-instants! []
(extend-protocol ConvertToDocument
Date
(from-document [input _]
(.toInstant ^Date input))))
(extend-protocol ConvertToDocument
nil
(document [_]