aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service/jobs/load-new-guix-revision.scm
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2022-11-06 08:47:58 +0100
committerChristopher Baines <mail@cbaines.net>2022-11-06 08:47:58 +0100
commit1e2826e09547fdb9c52ddfae3f4f5617fd178099 (patch)
treeb8b9ed37f12947192d6bbf2c48ee7bcd02923c71 /guix-data-service/jobs/load-new-guix-revision.scm
parentd06230fcf4fbea966966479795d5d781a156df6f (diff)
downloaddata-service-1e2826e09547fdb9c52ddfae3f4f5617fd178099.tar
data-service-1e2826e09547fdb9c52ddfae3f4f5617fd178099.tar.gz
Add more granular logging for computing system test derivations
Diffstat (limited to 'guix-data-service/jobs/load-new-guix-revision.scm')
-rw-r--r--guix-data-service/jobs/load-new-guix-revision.scm9
1 files changed, 5 insertions, 4 deletions
diff --git a/guix-data-service/jobs/load-new-guix-revision.scm b/guix-data-service/jobs/load-new-guix-revision.scm
index 22e8270..2eba411 100644
--- a/guix-data-service/jobs/load-new-guix-revision.scm
+++ b/guix-data-service/jobs/load-new-guix-revision.scm
@@ -382,14 +382,15 @@ WHERE job_id = $1")
`(lambda (store)
(map
(lambda (system-test)
- (simple-format
- (current-error-port)
- "guix-data-service: computing derivation for ~A system test\n"
- (system-test-name system-test))
(list (system-test-name system-test)
(system-test-description system-test)
(filter-map
(lambda (system)
+ (simple-format
+ (current-error-port)
+ "guix-data-service: computing derivation for ~A system test (on ~A)\n"
+ (system-test-name system-test)
+ system)
(catch
#t
(lambda ()