diff options
Diffstat (limited to 'guix-build-coordinator/hooks.scm')
-rw-r--r-- | guix-build-coordinator/hooks.scm | 4 |
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 |