From ca67709947d065784b219f184a17ee20fcb38b3b Mon Sep 17 00:00:00 2001
From: Colin Okay <okay@toyful.space>
Date: Tue, 8 Feb 2022 11:47:07 -0600
Subject: adding route variables to the documentation generator

---
 lazybones.lisp | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'lazybones.lisp')

diff --git a/lazybones.lisp b/lazybones.lisp
index 148cd05..5f46a83 100644
--- a/lazybones.lisp
+++ b/lazybones.lisp
@@ -285,11 +285,12 @@ Returns NIL on failure."
           (list (string-upcase var-name) (read-from-string (first decoder?)))
           (list (string-upcase var-name))))))
 
-(defun route-variables (route)
-  (loop for term in route
+(defun route-variables (pattern)
+  (loop for term in pattern
         when (listp term)
           collect (first term)))
 
+
 (defun run-endpoint (endpoint args request response app)
   "Bind dynamic variables *request* *response* and *app* before
 applying HANDLER-FUNCTION slot of ENDPOINT to the ARGS list."
-- 
cgit v1.2.3