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

Use clojurewerkz.support 0.2.0

Browse source
This commit is contained in:
Michael S. Klishin 2012-04-26 21:14:48 +04:00
parent d92112e135
commit c36a0abe8c
3 changed files with 16 additions and 17 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

21
project.clj
View file

@ -2,9 +2,10 @@
:description "Monger is an experimental idiomatic Clojure wrapper around MongoDB Java driver" :description "Monger is an experimental idiomatic Clojure wrapper around MongoDB Java driver"
:min-lein-version "2.0.0" :min-lein-version "2.0.0"
:license {:name "Eclipse Public License"} :license {:name "Eclipse Public License"}
:dependencies [[org.clojure/clojure "1.3.0"] :dependencies [[org.clojure/clojure "1.3.0"]
[org.mongodb/mongo-java-driver "2.7.3"] [org.mongodb/mongo-java-driver "2.7.3"]
[com.novemberain/validateur "1.1.0-beta1"]] [com.novemberain/validateur "1.1.0-beta1"]
[clojurewerkz/support "0.2.0"]]
:test-selectors {:default (complement :performance) :test-selectors {:default (complement :performance)
:focus :focus :focus :focus
:indexing :indexing :indexing :indexing
@ -16,17 +17,19 @@
:mailing-list {:name "clojure-monger" :mailing-list {:name "clojure-monger"
:archive "https://groups.google.com/group/clojure-monger" :archive "https://groups.google.com/group/clojure-monger"
:post "clojure-monger@googlegroups.com"} :post "clojure-monger@googlegroups.com"}
:profiles {:1.4 {:resource-paths ["test/resources"] :profiles {:1.4 {:dependencies [[org.clojure/clojure "1.4.0"]]}
:dependencies [[org.clojure/clojure "1.4.0"]]} :1.5 {:dependencies [[org.clojure/clojure "1.5.0-master-SNAPSHOT"]]}
:dev {:resource-paths ["test/resources"] :dev {:resource-paths ["test/resources"]
:dependencies [[clj-time "0.3.6" :exclusions [org.clojure/clojure]] :dependencies [[clj-time "0.3.6" :exclusions [org.clojure/clojure]]
[codox "0.3.4" :exclusions [org.clojure/clojure]] [codox "0.3.4" :exclusions [org.clojure/clojure]]
[org.clojure/data.json "0.1.2" :exclusions [org.clojure/clojure]] [org.clojure/data.json "0.1.2" :exclusions [org.clojure/clojure]]
[org.clojure/tools.cli "0.2.1" :exclusions [org.clojure/clojure]] [org.clojure/tools.cli "0.2.1" :exclusions [org.clojure/clojure]]
[org.clojure/core.cache "0.5.0" :exclusions [org.clojure/clojure]]]}} [org.clojure/core.cache "0.5.0" :exclusions [org.clojure/clojure]]]}}
:aliases { "all" ["with-profile" "dev:dev,1.4"] } :aliases {"all" ["with-profile" "dev:dev,1.4:dev,1.5"]}
:repositories {"clojure-releases" "http://build.clojure.org/releases" :repositories {"sonatype" {:url "http://oss.sonatype.org/content/repositories/releases"
"sonatype" {:url "http://oss.sonatype.org/content/repositories/releases"
:snapshots false, :snapshots false,
:releases {:checksum :fail :update :always}}} :releases {:checksum :fail :update :always}}
:warn-on-reflection true) "sonatype-snapshots" {:url "http://oss.sonatype.org/content/repositories/snapshots"
:snapshots true
:releases {:checksum :fail :update :always}}}
:warn-on-reflection true)

9
src/monger/joda_time.clj
View file

@ -11,7 +11,8 @@
(:import [org.joda.time DateTime DateTimeZone ReadableInstant] (:import [org.joda.time DateTime DateTimeZone ReadableInstant]
[org.joda.time.format ISODateTimeFormat]) [org.joda.time.format ISODateTimeFormat])
(:use [monger.conversion]) (:use [monger.conversion])
(:require [clojure.data.json :as json])) (:require [clojure.data.json :as json]
clojurewerkz.support.json))
;; ;;
;; API ;; API
@ -26,9 +27,3 @@
java.util.Date java.util.Date
(from-db-object [^java.util.Date input keywordize] (from-db-object [^java.util.Date input keywordize]
(org.joda.time.DateTime. input))) (org.joda.time.DateTime. input)))
(extend-protocol json/Write-JSON
org.joda.time.DateTime
(write-json [^DateTime object out escape-unicode?]
(json/write-json (.print (ISODateTimeFormat/dateTime) ^ReadableInstant object) out escape-unicode?)))

3
src/monger/json.clj
View file

@ -9,7 +9,8 @@
(ns monger.json (ns monger.json
(:import (org.bson.types ObjectId)) (:import (org.bson.types ObjectId))
(:require [clojure.data.json :as json])) (:require [clojure.data.json :as json]
clojurewerkz.support.json))
;; ;;
;; API ;; API