request: Remove stray pk.
authorRicardo Wurmus <rekado@elephly.net>
Sat, 6 Mar 2021 22:41:26 +0000 (23:41 +0100)
committerRicardo Wurmus <rekado@elephly.net>
Sat, 6 Mar 2021 22:41:26 +0000 (23:41 +0100)
aws/request.scm

index f9662b83c45050c483e28e552d43c3ce97faac00..563084a09080bc60f7ce9682409c729bd5b5fe41 100644 (file)
@@ -172,8 +172,8 @@ already mentioned in the request headers."
   "Process the format string URL in REQUEST-FORMAT-STRING and replace
 all placeholders (strings surrounded by curly braces) with their
 corresponding value in INPUT."
-  (let ((arguments (pk 'args (input-arguments->scm input)))
-        (parts (pk 'parts (string-split request-format-string (char-set #\{ #\})))))
+  (let ((arguments (input-arguments->scm input))
+        (parts (string-split request-format-string (char-set #\{ #\}))))
     ;; Every second item corresponds to a placeholder.
     (string-join (map (lambda (part index)
                         (if (odd? index)