aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix-build-coordinator/hooks.scm4
1 files changed, 4 insertions, 0 deletions
diff --git a/guix-build-coordinator/hooks.scm b/guix-build-coordinator/hooks.scm
index 8339b4f..e4b2bff 100644
--- a/guix-build-coordinator/hooks.scm
+++ b/guix-build-coordinator/hooks.scm
@@ -139,6 +139,7 @@
(define* (build-success-s3-publish-hook
s3-bucket
#:key
+ (aws-command "aws")
(command-line-arguments '())
(public-key (read-file-sexp %public-key-file))
(private-key (read-file-sexp %private-key-file))
@@ -148,6 +149,7 @@
(retry-on-error
(lambda ()
(s3-list-objects s3-bucket name
+ #:command aws-command
#:command-line-arguments
command-line-arguments))
#:times 6
@@ -172,6 +174,7 @@
(s3-cp s3-bucket
(string-append directory "/" nar-filename)
nar-filename
+ #:command aws-command
#:command-line-arguments
command-line-arguments))
#:times 6
@@ -187,6 +190,7 @@
(s3-cp s3-bucket
(string-append directory "/" narinfo-filename)
narinfo-filename
+ #:command aws-command
#:command-line-arguments
command-line-arguments))
#:times 6