aboutsummaryrefslogtreecommitdiff
path: root/guix-build-coordinator/hooks.scm
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2020-09-17 10:41:11 +0100
committerChristopher Baines <mail@cbaines.net>2020-09-17 10:41:11 +0100
commitf7dbc0cb3ac572e4dabad88696550c4a19d0e1a5 (patch)
tree3c7445edeb5f917e458408969ac4b2dbfde73f59 /guix-build-coordinator/hooks.scm
parent6c9e59dd65fe97f48ed6ea451afd23bb29e6bdff (diff)
downloadbuild-coordinator-f7dbc0cb3ac572e4dabad88696550c4a19d0e1a5.tar
build-coordinator-f7dbc0cb3ac572e4dabad88696550c4a19d0e1a5.tar.gz
Better describe the default hooks
Diffstat (limited to 'guix-build-coordinator/hooks.scm')
-rw-r--r--guix-build-coordinator/hooks.scm9
1 files changed, 9 insertions, 0 deletions
diff --git a/guix-build-coordinator/hooks.scm b/guix-build-coordinator/hooks.scm
index 629372f..c99f291 100644
--- a/guix-build-coordinator/hooks.scm
+++ b/guix-build-coordinator/hooks.scm
@@ -39,6 +39,8 @@
build-failure-retry-hook
default-build-missing-inputs-hook
+ %default-hooks
+
build-submitted-send-event-to-guix-data-service-hook
build-started-send-event-to-guix-data-service-hook
build-success-send-event-to-guix-data-service-hook
@@ -261,6 +263,13 @@
missing-input)))))
missing-inputs))))
+(define %default-hooks
+ `((build-submitted . ,default-build-submitted-hook)
+ (build-started . ,default-build-started-hook)
+ (build-success . ,default-build-success-hook)
+ (build-failure . ,default-build-failure-hook)
+ (build-missing-inputs . ,default-build-missing-inputs-hook)))
+
(define (build-submitted-send-event-to-guix-data-service-hook target-url)
(lambda (build-coordinator build-id)
(define datastore