commit
34ef1f44b6
2 changed files with 11 additions and 0 deletions
1
src/data_readers.clj
Normal file
1
src/data_readers.clj
Normal file
|
|
@ -0,0 +1 @@
|
||||||
|
{mongo/id mongo-driver-3.data-literals/mongo-id}
|
||||||
10
src/mongo_driver_3/data_literals.clj
Normal file
10
src/mongo_driver_3/data_literals.clj
Normal file
|
|
@ -0,0 +1,10 @@
|
||||||
|
(ns mongo-driver-3.data-literals
|
||||||
|
(:import (org.bson.types ObjectId)
|
||||||
|
(java.io Writer)))
|
||||||
|
|
||||||
|
|
||||||
|
(defmethod print-method ObjectId [c ^Writer w] (.write w ^String (str "#mongo/id \"" (.toHexString c) "\"")))
|
||||||
|
(defmethod print-dup ObjectId [c ^Writer w] (.write w ^String (str "#mongo/id \"" (.toHexString c) "\"")))
|
||||||
|
|
||||||
|
(defn mongo-id [o]
|
||||||
|
(ObjectId. o))
|
||||||
Loading…
Reference in a new issue