Add unit test for fetch-by-ids.

jaceklaskowski · Dec 17, 2011 · 66c4300 · 66c4300
1 parent 78a578d
commit 66c4300
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/test/somnium/test/congomongo.clj b/test/somnium/test/congomongo.clj
@@ -145,6 +145,12 @@
     (is (= "Stone" (:val (fetch-by-id :by-id "Blarney"))))
     (is (= "warriors" (:val (fetch-by-id :by-id 300))))))
 
+(deftest fetch-by-ids-of-any-type
+  (with-test-mongo
+    (insert! :by-ids {:_id "Blarney" :val "Stone"})
+    (insert! :by-ids {:_id 300 :val "warriors"})
+    (is (= #{"Stone" "warriors"} (set (map :val (fetch-by-ids :by-ids ["Blarney" 300])))))))
+
 (deftest eager-ref-fetching
   (let [fetch-eagerly       (with-ref-fetching fetch)
         fetch-eagerly-by-id (with-ref-fetching fetch-by-id)