diff options
| author | dumpfmprod <dumpfmprod@ubuntu.(none)> | 2010-03-26 18:21:31 -0400 |
|---|---|---|
| committer | dumpfmprod <dumpfmprod@ubuntu.(none)> | 2010-03-26 18:21:31 -0400 |
| commit | 9d66e591710e593ea035e765b955367957afb6e3 (patch) | |
| tree | 773d1a6136b8a1be49f1e831f164d85c1797c870 | |
| parent | 27afb7560d470782f81523f7dff3242c8f31dbdd (diff) | |
Added landing page back
| -rwxr-xr-x | src/site.clj | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/site.clj b/src/site.clj index 55a668a..63d2eec 100755 --- a/src/site.clj +++ b/src/site.clj @@ -284,7 +284,9 @@ ;; Landing (defn landing [session] - (redirect-to "/chat")) + (if (session :nick) + (redirect-to "/chat") + (serve-file "static" "index.html"))) (defn login [session params cookies] (let [nick (params :nick) |