[bug#40157] [PATCH] hydra: Display the IRC logs in reverse chronological order.

[Leo Famulari]

I think that people usually want to read the latest logs, which
currently requires a lot of scrolling.

* hydra/goggles.scm (index): Reverse the list of log files.
---
 hydra/goggles.scm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/hydra/goggles.scm b/hydra/goggles.scm
index 169b3c3..884c8df 100644
--- a/hydra/goggles.scm
+++ b/hydra/goggles.scm
@@ -181,9 +181,9 @@ freenode." channel))
      (ul
       ,@(map (lambda (file)
                `(li (a (@ (href ,(string-append "/" channel "/" file))) 
,file)))
-             (or (scandir (string-append %log-root "/#" channel "/")
-                          (lambda (name)
-                           (not (member name '("." ".." "index.html")))))
+             (or (reverse (scandir (string-append %log-root "/#" channel "/")
+                                   (lambda (name)
+                                    (not (member name '("." ".." 
"index.html"))))))
                  '()))))))
 
 (define %controller
-- 
2.25.1