From 3c1d01f4e741cdae4e8d03416d689dcebb8a487e Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Sat, 6 Mar 2021 23:41:26 +0100 Subject: request: Remove stray pk. --- aws/request.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/aws/request.scm b/aws/request.scm index f9662b8..563084a 100644 --- a/aws/request.scm +++ b/aws/request.scm @@ -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) -- cgit v1.2.3