diff options
| author | sostler <sbostler@gmail.com> | 2010-01-24 18:27:05 -0500 |
|---|---|---|
| committer | sostler <sbostler@gmail.com> | 2010-01-24 18:27:05 -0500 |
| commit | eb51bce12f0e866d09ce7df2e619820d76061af3 (patch) | |
| tree | 490ee7079b1f60313af6534b5475224af8842a61 /src | |
| parent | f69cd3b50f35c97eba1a4f1ed47e933edc2ec2f6 (diff) | |
commit
Diffstat (limited to 'src')
| -rwxr-xr-x | src/site.clj | 3 |
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")] |
