Add a list of the queued revisions to the index page

2019-03-03 18:15:29 +00:00 · 2019-03-03 18:15:29 +00:00 · 623347d835
commit 623347d835
parent ffdd2416f4
3 changed files with 88 additions and 45 deletions
--- a/guix-data-service/web/controller.scm
+++ b/guix-data-service/web/controller.scm
@ -201,7 +201,9 @@
 (define (controller request body conn)
  (match-lambda
    ((GET)
-     (apply render-html (index (most-recent-n-guix-revisions conn 10))))
+     (apply render-html (index
+                         (most-recent-n-guix-revisions conn 10)
+                         (most-recent-n-load-new-guix-revision-jobs conn 1000))))
    ((GET "compare")
     (with-base-and-target-commits
      request conn