diff options
author | Colin Okay <okay@toyful.space> | 2022-03-26 16:27:50 -0500 |
---|---|---|
committer | Colin Okay <okay@toyful.space> | 2022-03-26 16:27:50 -0500 |
commit | 4d525307ec2b50e427c2c5d56268342ed2b0396c (patch) | |
tree | c82a3a139495cf2a5146cd00e14b877d29011303 | |
parent | 97c0ad9e99d4d56e8ee15cd2ef83ecd7dd82ebf8 (diff) |
[redesign] renamed generated functions to look like URIs
-rw-r--r-- | lazybones-client.lisp | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lazybones-client.lisp b/lazybones-client.lisp index 65baed4..dbf6a01 100644 --- a/lazybones-client.lisp +++ b/lazybones-client.lisp @@ -30,14 +30,14 @@ endpoint EP." (with-output-to-string (*standard-output*) (princ (string-downcase (symbol-name (lazybones::endpoint-method ep)))) - (princ "/") + (princ "-") (loop for (term . more) on (lazybones::endpoint-dispatch-pattern ep) when (and (stringp term) (plusp (length term))) - do (princ term) + do (princ (string-downcase term)) when (listp term) - do (princ (car term)) + do (princ (string-downcase (car term))) when (and more (plusp (length term))) - do (princ "-")))) + do (princ "/")))) (defun endpoint-defun-route-var-names (ep) "Returns a list of strings representing the names of route variables |