diff options
| author | Christopher Baines <mail@cbaines.net> | 2020-10-24 11:07:07 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2020-10-24 11:07:07 +0100 |
| commit | 2eee8164ded286f872588771dab3b2b4401adb6d (patch) | |
| tree | 9e85f254e560227948ed8b75bec94a0f3cccf3bd | |
| parent | 247ef80ac194f1824c5021dc248b99331dd6ce31 (diff) | |
| download | build-coordinator-2eee8164ded286f872588771dab3b2b4401adb6d.tar build-coordinator-2eee8164ded286f872588771dab3b2b4401adb6d.tar.gz | |
Allow configuring the s3-publish-hook with a aws command
So that an absolute filename can be used.
| -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 |