summaryrefslogtreecommitdiff
path: root/src/site.clj
diff options
context:
space:
mode:
Diffstat (limited to 'src/site.clj')
-rw-r--r--src/site.clj7
1 files changed, 5 insertions, 2 deletions
diff --git a/src/site.clj b/src/site.clj
index 6a011c6..0967431 100644
--- a/src/site.clj
+++ b/src/site.clj
@@ -1047,8 +1047,11 @@ FROM users u
(unknown-page)))
(defn hall-of-fame [session]
- (let [st (fetch-template "fame" session)]
- (.setAttribute st "dumps" (map process-message-for-output (poll hall-results)))
+ (let [st (fetch-template "fame" session)
+ msgs (add-user-favs-to-msgs (poll hall-results)
+ (session :user_id))]
+ (println "hall msgs:" msgs)
+ (.setAttribute st "dumps" (map process-message-for-output msgs))
(.toString st)))
;; Compojure Routes