aws/request: make-operation->request: Always append request body.

* aws/request.scm (make-operation->request): Remove match expression.

1 files changed, 1 insertions, 5 deletions

diff --git a/aws/request.scm b/aws/request.scm
index 8ecb543..630112e 100644
--- a/aws/request.scm
+++ b/aws/request.scm
@@ -329,11 +329,7 @@ corresponding value in INPUT."
         (lambda ()
           (http-request (string-append endpoint canonical-uri)
                         #:method (string->symbol method)
-                        #:body
-                        (match method
-                          ("POST"
-                           (string->utf8 request-parameters))
-                          (_ ""))
+                        #:body (string->utf8 request-parameters)
                         #:headers new-headers))
       (lambda (response body)
         (let ((server-text (match body