diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/site.clj | 16 |
1 files changed, 7 insertions, 9 deletions
diff --git a/src/site.clj b/src/site.clj index 6a8d8f6..0a22a88 100644 --- a/src/site.clj +++ b/src/site.clj @@ -338,9 +338,7 @@ ORDER BY cnt DESC (def *user-info-query* " SELECT u.nick, u.user_id, - u.avatar, - LAST.content, - LAST.message_id + u.avatar FROM users u LEFT JOIN messages LAST ON u.user_id = LAST.user_id @@ -361,8 +359,8 @@ FROM users u {:list res :map (zipmap (map :nick res) (map :cnt res))})) -(def *scores-refresh-period-sec* (* 30 60)) -(def *user-info-refresh-period-sec* 300) +(def *scores-refresh-period-sec* (* 29 60)) +(def *user-info-refresh-period-sec* (* 31 60)) (def *user-scores* (scheduled-agent build-score-list @@ -521,7 +519,7 @@ FROM users u profile-nick (:nick user-info) ; Update to get right casing nick (session :nick) logger (make-time-logger) - has-avatar (non-empty-string? (user-info :avatar)) + has-avatar (non-empty-string? (:avatar user-info)) offset (maybe-parse-int offset 0) dump-offset (* offset *dumps-per-page*) raw-dumps (logger tags/fetch-dumps-by-nick @@ -1290,12 +1288,12 @@ order by count desc limit ? offset ?") (load-rooms!) (start! reserved-nicks) (def server (start-server (options :port))) -(start! *user-scores*) -(start! *user-info*) (start! *active-mutes*) ; Delay the following to reduce start-load -(Thread/sleep 3000) +(Thread/sleep 15000) +(start! *user-scores*) +(start! *user-info*) (start-user-flusher!) (start-session-pruner!) (start! hall-results) |