summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorsostler <sbostler@gmail.com>2010-01-24 18:27:05 -0500
committersostler <sbostler@gmail.com>2010-01-24 18:27:05 -0500
commiteb51bce12f0e866d09ce7df2e619820d76061af3 (patch)
tree490ee7079b1f60313af6534b5475224af8842a61 /src
parentf69cd3b50f35c97eba1a4f1ed47e933edc2ec2f6 (diff)
commit
Diffstat (limited to 'src')
-rwxr-xr-xsrc/site.clj3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/site.clj b/src/site.clj
index 4f6ca71..9d66735 100755
--- a/src/site.clj
+++ b/src/site.clj
@@ -132,6 +132,7 @@
@(room :messages)))))
(defn process-user [u]
+ (prn u)
(if (u :avatar)
{"nick" (u :nick)
"avatar" (encode-html-entities (u :avatar))}
@@ -217,7 +218,7 @@
(defn login [session params]
(let [nick (params :nick)
hash (params :hash)
- db-user (authorize-nick-hash nick hash)]
+ db-user (authorize-nick-hash nick hash)]
(if db-user
[(populate-session-from-db db-user)
(resp-success "OK")]