From 1b06b06e7e0351dea457b1e96faecd2c705d91c2 Mon Sep 17 00:00:00 2001 From: Scott Ostler Date: Sun, 2 Jan 2011 17:03:04 -0500 Subject: Sort redis results by score, quickfix until redis broken connections can be fixed --- src/datalayer.clj | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/src/datalayer.clj b/src/datalayer.clj index 6b2a466..711dc65 100644 --- a/src/datalayer.clj +++ b/src/datalayer.clj @@ -106,7 +106,9 @@ order by count desc limit ? offset ?") (redis/zrevrange rkey 0 (dec num-popular-dumps))) msg-ids (map maybe-parse-int msg-ids)] (if-not (empty? msg-ids) - (tags/fetch-dumps-by-ids msg-ids viewer-nick)))) + (sort-by + #(* -1 (:count %)) + (tags/fetch-dumps-by-ids msg-ids viewer-nick))))) ;;;; Redis Favscores @@ -147,7 +149,9 @@ order by count desc limit ? offset ?") (redis/with-server redis-server (redis/zrevrange "hall" 0 (dec num-hall-dumps))))] (if-not (empty? ids) - (tags/fetch-dumps-by-ids ids viewer-nick)))) + (sort-by + #(* -1 (:count %)) + (tags/fetch-dumps-by-ids ids viewer-nick))))) ;;;; Message insertion -- cgit v1.2.3-70-g09d2