diff options
Diffstat (limited to 'guix-data-service/web/compare')
| -rw-r--r-- | guix-data-service/web/compare/controller.scm | 18 |
1 files changed, 16 insertions, 2 deletions
diff --git a/guix-data-service/web/compare/controller.scm b/guix-data-service/web/compare/controller.scm index b970904..2eea4a1 100644 --- a/guix-data-service/web/compare/controller.scm +++ b/guix-data-service/web/compare/controller.scm @@ -636,7 +636,13 @@ mime-types) ((application/json) (render-json - derivation-changes)) + `((revisions + . ((base + . ((commit . ,base-commit))) + (target + . ((commit . ,target-commit))))) + (derivation_changes + . ,derivation-changes)))) (else (letpar& ((systems (with-thread-postgresql-connection @@ -729,7 +735,15 @@ mime-types) ((application/json) (render-json - derivation-changes)) + `((revisions + . ((base + . ((commit . ,(second base-revision-details)) + (datetime . ,(fifth base-revision-details)))) + (target + . ((commit . ,(second target-revision-details)) + (datetime . ,(fifth target-revision-details)))))) + (derivation_changes + . ,derivation-changes)))) (else (render-html #:sxml (compare/package-derivations |