branch master updated: hydra: Display the IRC logs in reverse chronological order.

[Ricardo Wurmus]

This is an automated email from the git hooks/post-receive script.

rekado pushed a commit to branch master
in repository maintenance.

The following commit(s) were added to refs/heads/master by this push:
     new c9517ff  hydra: Display the IRC logs in reverse chronological order.
c9517ff is described below

commit c9517ff24517149f041a7c2b6debd20acce7fd65
Author: Leo Famulari <address@hidden>
AuthorDate: Fri Mar 20 17:43:49 2020 -0400

    hydra: Display the IRC logs in reverse chronological order.
    
    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.
    
    Signed-off-by: Ricardo Wurmus <address@hidden>
---
 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