From 85a373f639376307156510bbf24ec2fa30da5acd Mon Sep 17 00:00:00 2001
From: Mathieu Othacehe <m.othacehe@gmail.com>
Date: Mon, 23 Apr 2018 09:50:31 +0200
Subject: http: Reverse evaluations list.

* src/cuirass/database.scm (db-get-evaluations): Reverse returned evaluations
list.
---
 src/cuirass/database.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/cuirass/database.scm b/src/cuirass/database.scm
index 8437475..a1398bc 100644
--- a/src/cuirass/database.scm
+++ b/src/cuirass/database.scm
@@ -548,7 +548,7 @@ INSERT INTO Stamps (specification, stamp) VALUES ("
 FROM Evaluations ORDER BY id DESC LIMIT " limit ";"))
              (evaluations '()))
     (match rows
-      (() evaluations)
+      (() (reverse evaluations))
       ((#(id specification revision)
         . rest)
        (loop rest
-- 
cgit v1.2.3