From fd62ea64e0ef18a4f33eba73b26b8b971478cb9b Mon Sep 17 00:00:00 2001
From: Jean Niklas L'orange <jeannikl@hypirion.com>
Date: Sat, 9 Mar 2013 09:22:03 +0100
Subject: [PATCH] Sort the log files in descending order.

---
 src/lazybot/plugins/logger.clj | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/lazybot/plugins/logger.clj b/src/lazybot/plugins/logger.clj
index fbcda52a..d62c921b 100644
--- a/src/lazybot/plugins/logger.clj
+++ b/src/lazybot/plugins/logger.clj
@@ -112,9 +112,9 @@
       (list
         [:h1 "Logs for " channel " on " server]
         [:ol
-         (map (fn [log]
-                [:li (link log server channel log)])
-              logs)]))))
+         (->> logs
+              (sort (fn [a b] (compare b a)))
+              (map (fn [log] [:li (link log server channel log)])))]))))
 
 (defn server-index
   "A hiccup doc describing logs on a server."