This commit is contained in:
Michael S. Klishin 2011-09-19 12:29:22 +04:00
parent 2673c5bc0f
commit 189d2366ab

View file

@ -64,13 +64,13 @@
(defmacro with-connection (defmacro with-connection
[conn & body] [conn & body]
`(binding [*mongodb-connection* conn] `(binding [*mongodb-connection* ~conn]
(do ~@body))) (do ~@body)))
(defmacro with-db (defmacro with-db
[db & body] [db & body]
`(binding [*mongodb-database* db] `(binding [*mongodb-database* ~db]
(do ~@body))) (do ~@body)))