Can't use print-dup on dates on 1.3 :(

This commit is contained in:
Michael S. Klishin 2012-06-27 19:08:15 +04:00
parent 5e4d8d7c5a
commit 2fcdfab8ba

View file

@ -43,7 +43,7 @@
key (or key (str (UUID/randomUUID))) key (or key (str (UUID/randomUUID)))
value (binding [*print-dup* true] value (binding [*print-dup* true]
(pr-str (assoc data :date date :_id key)))] (pr-str (assoc data :date date :_id key)))]
(mc/save (.collection-name store) {:_id key :date date :value value}) (mc/save (.collection-name store) {:_id key :value value})
key)) key))
(delete-session [store key] (delete-session [store key]