From bf05012ba5fb6ec1c4918de8208a5a3b04427aa9 Mon Sep 17 00:00:00 2001 From: colin Date: Sat, 23 Nov 2024 08:39:27 -0800 Subject: Better error in route-to --- src/endpoint.lisp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/endpoint.lisp') diff --git a/src/endpoint.lisp b/src/endpoint.lisp index cb71658..8189572 100644 --- a/src/endpoint.lisp +++ b/src/endpoint.lisp @@ -243,7 +243,8 @@ extractors." part))) (format nil "~{~a~}" (loop :for part :in build-parts :when (keywordp part) - :do (assert (getf kwargs part) (kwargs) "path needs ~s" part) + :do (assert (getf kwargs part) (kwargs) + "path to ~s needs ~s" (class-name class) part) :and :collect (getf kwargs part) :else :collect part)))))) -- cgit v1.2.3