[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
03/03: Fix a bug with the derivation and output history JSON representat
From: |
Christopher Baines |
Subject: |
03/03: Fix a bug with the derivation and output history JSON representation |
Date: |
Wed, 1 Jul 2020 18:10:00 -0400 (EDT) |
cbaines pushed a commit to branch master
in repository data-service.
commit bbf8011c959cc9013f752cf5a5ad7c128acbabba
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Wed Jul 1 19:57:06 2020 +0100
Fix a bug with the derivation and output history JSON representation
Thanks to zimoun for reporting.
---
guix-data-service/web/repository/controller.scm | 14 ++++++++++----
1 file changed, 10 insertions(+), 4 deletions(-)
diff --git a/guix-data-service/web/repository/controller.scm
b/guix-data-service/web/repository/controller.scm
index f60fb69..2575170 100644
--- a/guix-data-service/web/repository/controller.scm
+++ b/guix-data-service/web/repository/controller.scm
@@ -365,7 +365,8 @@
first-guix-revision-commit
first-datetime
last-guix-revision-commit
- last-datetime)
+ last-datetime
+ builds)
`((version . ,package-version)
(derivation . ,derivation-file-name)
(first_revision
@@ -373,7 +374,9 @@
(datetime . ,first-datetime)))
(last_revision
. ((commit .
,last-guix-revision-commit)
- (datetime . ,last-datetime))))))
+ (datetime . ,last-datetime)))
+ (builds
+ . ,(list->vector builds)))))
package-derivations))))))
(else
(render-html
@@ -430,7 +433,8 @@
first-guix-revision-commit
first-datetime
last-guix-revision-commit
- last-datetime)
+ last-datetime
+ builds)
`((version . ,package-version)
(derivation . ,derivation-file-name)
(first_revision
@@ -438,7 +442,9 @@
(datetime . ,first-datetime)))
(last_revision
. ((commit .
,last-guix-revision-commit)
- (datetime . ,last-datetime))))))
+ (datetime . ,last-datetime)))
+ (builds
+ . ,(list->vector builds)))))
package-outputs))))))
(else
(render-html