diff options
| author | Christopher Baines <mail@cbaines.net> | 2019-09-07 17:19:34 +0200 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2019-09-07 17:19:34 +0200 |
| commit | eb0d33a3ba38f14c2f868a12b8ea062b9c85980c (patch) | |
| tree | fccb75579961e17af23b3acebff5989ccd5bde06 /guix-data-service/web/controller.scm | |
| parent | fe8102e1dfbc6dd83cc4ad03e2869a967750ba4f (diff) | |
| download | data-service-eb0d33a3ba38f14c2f868a12b8ea062b9c85980c.tar data-service-eb0d33a3ba38f14c2f868a12b8ea062b9c85980c.tar.gz | |
Show lint warnings on the comparison page
Diffstat (limited to 'guix-data-service/web/controller.scm')
| -rw-r--r-- | guix-data-service/web/controller.scm | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/guix-data-service/web/controller.scm b/guix-data-service/web/controller.scm index 038af58..58b824e 100644 --- a/guix-data-service/web/controller.scm +++ b/guix-data-service/web/controller.scm @@ -43,6 +43,7 @@ #:use-module (guix-data-service model build) #:use-module (guix-data-service model lint-checker) #:use-module (guix-data-service model lint-warning) + #:use-module (guix-data-service model utils) #:use-module (guix-data-service jobs load-new-guix-revision) #:use-module (guix-data-service web render) #:use-module (guix-data-service web sxml) @@ -469,7 +470,13 @@ target-packages-vhash)) (version-changes (package-data-version-changes base-packages-vhash - target-packages-vhash))) + target-packages-vhash)) + (lint-warnings-data + (group-list-by-first-n-fields + 2 + (lint-warning-differences-data conn + base-revision-id + target-revision-id)))) (case (most-appropriate-mime-type '(application/json text/html) mime-types) @@ -495,7 +502,8 @@ target-revision-id)) new-packages removed-packages - version-changes) + version-changes + lint-warnings-data) #:extra-headers http-headers-for-unchanging-content)))))) (define (render-compare/derivations mime-types |