diff options
| -rw-r--r-- | src/site.clj | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/src/site.clj b/src/site.clj index f6291df..e8f2b1e 100644 --- a/src/site.clj +++ b/src/site.clj @@ -626,7 +626,7 @@ FROM users u (if nick (dosync (login-user (user-struct-from-session session) room))) - (let [user-list (prepare-user-list room)] + (let [user-list (prepare-user-list room false)] (.setAttribute st "users" user-list)) (.setAttribute st "roomkey" (room :key)) (.setAttribute st "isadminroom" (room :admin_only)) @@ -1089,7 +1089,8 @@ FROM users u ;;; Startup Code (defn start-server [port] - (run-server {:port port} + (run-server {:port port + :nio true} "/static/*" (servlet static) "/images/*" (servlet static) "/avatars/*" (servlet static) @@ -1107,14 +1108,15 @@ FROM users u (load-rooms!) (start! reserved-nicks) -(start-server (options :port)) +(def server (start-server (options :port))) (start! *user-scores*) (start! *user-info*) (start! *active-mutes*) -(Thread/sleep 3000) ; Delay these to reduce start-load + +; Delay the following to reduce start-load +(Thread/sleep 3000) (start-user-flusher!) (start-session-pruner!) - -;(start! feed-downloader) +(start! feed-downloader) (start! feed-inserter) |