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

data literal for mongo id

Browse source
This commit is contained in:
Henry Widd 2020-07-17 13:56:47 +01:00
parent 30e5d7c9ea
commit 4440798a24
2 changed files with 11 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
src/data_readers.clj Normal file
View file

@ -0,0 +1 @@
{mongo/id mongo-driver-3.data-literals/mongo-id}

10
src/mongo_driver_3/data_literals.clj Normal file
View 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))