Merge pull request #4 from henryw374/master

data literal for mongo id
This commit is contained in:
gnarroway 2021-10-25 21:11:01 +08:00 committed by GitHub
commit 34ef1f44b6
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
2 changed files with 11 additions and 0 deletions

1
src/data_readers.clj Normal file
View file

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

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))