From bd21180e8843af4a0abc43ceb78bf6c9af25c441 Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Tue, 7 Jul 2020 21:27:13 +0200
Subject: aws/request: make-operation->request: Handle empty input values.

* aws/request.scm (make-operation->request)[request-parameters]:
Gracefully deal with empty input values.
---
 aws/request.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'aws')

diff --git a/aws/request.scm b/aws/request.scm
index faa5e0d..e0cf58f 100644
--- a/aws/request.scm
+++ b/aws/request.scm
@@ -151,7 +151,9 @@
     (define request-parameters
       (string-join (cons* (format #f "Action=~a" operation-name)
                           (format #f "Version=~a" api-version)
-                          (serialize-aws-value input))
+                          (if input
+                              (serialize-aws-value input)
+                              '()))
                    "&"))
 
     (define payload-hash
-- 
cgit v1.2.3