From 19a9beb046fe06c9162b4a98d50ff89f45a1ff87 Mon Sep 17 00:00:00 2001 From: "Michael S. Klishin" Date: Fri, 16 Dec 2011 11:42:13 +0400 Subject: [PATCH] Add test examples that demonstrate java.util.Date and java.util.Calendar conversion --- test/monger/test/conversion.clj | 15 ++++++++++++++- 1 file changed, 14 insertions(+), 1 deletion(-) diff --git a/test/monger/test/conversion.clj b/test/monger/test/conversion.clj index 547ae3d..d27fac8 100644 --- a/test/monger/test/conversion.clj +++ b/test/monger/test/conversion.clj @@ -1,7 +1,8 @@ (ns monger.test.conversion (:require [monger core collection] [monger.conversion :as cnv]) - (:import (com.mongodb DBObject BasicDBObject BasicDBList) (java.util List ArrayList)) + (:import [com.mongodb DBObject BasicDBObject BasicDBList] + [java.util Date Calendar List ArrayList]) (:use [clojure.test])) @@ -55,6 +56,18 @@ output (cnv/to-db-object input)] (is (= input output)))) +(deftest convert-java-date-to-dbobject + (let [date (Date.) + input { :int 1, :string "Mongo", :date date } + output ^DBObject (cnv/to-db-object input)] + (is (= date (.get output "date"))))) + +(deftest convert-java-calendar-instance-to-dbobject + (let [date (Calendar/getInstance) + input { :int 1, :string "Mongo", :date date } + output ^DBObject (cnv/to-db-object input)] + (is (= date (.get output "date"))))) +