From 2742fd7bc38999287b9ee7de9f3b94f8d1ac5cc0 Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Tue, 8 Feb 2022 15:19:12 -0600 Subject: changed route format in documentation, updated example documentation --- lazybones-documentation.lisp | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'lazybones-documentation.lisp') diff --git a/lazybones-documentation.lisp b/lazybones-documentation.lisp index c7cd591..b64ec63 100644 --- a/lazybones-documentation.lisp +++ b/lazybones-documentation.lisp @@ -25,7 +25,7 @@ (dolist (ep (sorted-endpoints endpoints)) (with-slots (method content-type route authorizer endpoint-documentation) ep newline - (princ "### ") (princ method) (princ " ") (princ route) + (princ "### ") (princ method) (princ " ") (princ (make-route-presentable route)) (terpri) (princ "*") (princ (if content-type content-type default-content-type )) @@ -71,3 +71,6 @@ (defun route-var-value-parser (ep var) (second (assoc var (remove-if-not #'consp (endpoint-dispatch-pattern ep))))) + +(defun make-route-presentable (routestring) + (ppcre:regex-replace-all " [a-z0-9A-Z\-]+:" routestring ":")) -- cgit v1.2.3