aws/request: make-operation->request: Include content hash header.

[software/guile-aws.git] / aws / request.scm

diff --git a/aws/request.scm b/aws/request.scm
index e0cf58fd6f69a4a0806c550e5b55c3fd8b7c96e0..764ed43390292f43bc1ccbbe3f7af647d0461330 100644 (file)
--- a/aws/request.scm
+++ b/aws/request.scm
@@ -175,6 +175,7 @@
     (define headers
       (filter cdr `((content-type . ,content-type)
                     (host         . (,host . #f))
+                    (x-amz-content-sha256 . ,payload-hash)
                     (x-amz-date   . ,amz-date)
                     (x-amz-target . ,amz-target))))
     (define authorization-header