From 51245b6904ab4b8b82db8e7a3bef777f0a368564 Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <code@mail.matthias.benkard.de>
Date: Mon, 9 Apr 2012 21:53:31 +0200
Subject: Lafargue: Make lazychat instant notifications work.

---
 src/mulk/benki/lazychat.clj | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/mulk/benki/lazychat.clj b/src/mulk/benki/lazychat.clj
index 71de948..6f9f011 100644
--- a/src/mulk/benki/lazychat.clj
+++ b/src/mulk/benki/lazychat.clj
@@ -55,7 +55,7 @@
                  {:content  content,  :visibility visibility,
                   :format   format,   :targets    targets,
                   :referees referees, :id         id,
-                  :author  *user*})))))
+                  :author   *user*,   :date       (java.util.Date.)})))))
 
 (defn select-message [id]
   (let [message  (query1 "SELECT author, content, format, visibility, date
-- 
cgit v1.2.3