diff options
author | colin <colin@cicadas.surf> | 2024-11-23 08:39:27 -0800 |
---|---|---|
committer | colin <colin@cicadas.surf> | 2024-11-23 08:39:27 -0800 |
commit | bf05012ba5fb6ec1c4918de8208a5a3b04427aa9 (patch) | |
tree | e3f588ae789318e259d78cf0dbc75f55ab00f7de /src/endpoint.lisp | |
parent | 0281b662f1153c0ef8cb34c373aa75b5692a515d (diff) |
Better error in route-to
Diffstat (limited to 'src/endpoint.lisp')
-rw-r--r-- | src/endpoint.lisp | 3 |
1 files changed, 2 insertions, 1 deletions
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)))))) |