luciano/mongo-driver-3
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

read dates as instants

Browse source
This commit is contained in:
Henry Widd 2020-07-17 14:03:58 +01:00
parent 30e5d7c9ea
commit 406e5d3576
1 changed files with 7 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
src/mongo_driver_3/model.clj
View file

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