From 83e1bb5afeb0205b8b8ef07df6be16f3c68e7cf3 Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Thu, 25 Feb 2021 14:04:36 +0100
Subject: base: aws-operation: Make input argument optional.

---
 aws/base.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'aws/base.scm')

diff --git a/aws/base.scm b/aws/base.scm
index 55346c7..21a55b9 100644
--- a/aws/base.scm
+++ b/aws/base.scm
@@ -139,7 +139,7 @@
 
 (define* (aws-operation requester #:key name input-type output-type http documentation)
   (let ((proc
-         (lambda (input)
+         (lambda* (#:optional input)
            (unless (eq? (aws-name input) input-type)
              (error (format #f "~a: input must be of type ~a: ~a~%"
                             name input-type input)))
-- 
cgit v1.2.3