aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/client/dexador/generate.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/client/dexador/generate.lisp b/src/client/dexador/generate.lisp
index dd4652c..9257d72 100644
--- a/src/client/dexador/generate.lisp
+++ b/src/client/dexador/generate.lisp
@@ -54,7 +54,7 @@
`(defun ,(class-name class) (,host ,@args &rest ,dexador-kwargs)
(apply #',dexador-fn
- (concatenate 'string ,host ,@parts)
+ (format nil "~a~{~a~}" ,host (list ,@parts))
,@(when reqbody
(list :content reqbody))
,dexador-kwargs))))