luciano/monger
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add an example that inserts a document with Clojure keywords as values

Browse source
This commit is contained in:
Michael S. Klishin 2012-04-16 01:14:26 +04:00
parent 379fb73795
commit 5c62e47de7
1 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
test/monger/test/inserting_test.clj
View file

@ -62,6 +62,13 @@
result (mgcol/insert "widgets" doc)] result (mgcol/insert "widgets" doc)]
(is (= 5.5 (:ratio (mgcol/find-map-by-id collection id)))))) (is (= 5.5 (:ratio (mgcol/find-map-by-id collection id))))))
(deftest insert-a-document-with-clojure-keyword-in-it
(let [collection "widgets"
id (ObjectId.)
doc { :keyword :kwd "_id" id }
result (mgcol/insert "widgets" doc)]
(is (= (name :kwd) (:keyword (mgcol/find-map-by-id collection id)))))) ;
(defrecord Metrics (defrecord Metrics
[rps eps]) [rps eps])