Update: README. Add: print-all-route-documentation

1 files changed, 4 insertions, 2 deletions

diff --git a/examples/kitchensink.lisp b/examples/kitchensink.lisp
index 00a7f25..7fcf45b 100644
--- a/examples/kitchensink.lisp
+++ b/examples/kitchensink.lisp
@@ -54,7 +54,8 @@
 
 (defclass hello ()
   ()
-  (:documentation "A Page that just says hello.")
+  (:documentation "A Page that just says hello to an identified user. Redirects users to
+identify themselves if no name is known.")
   (:metaclass wknd:endpoint)
   (:method . :get)
   (:route-parts "hello")
@@ -74,7 +75,8 @@
   ((name :reader name :initarg :name :type string))
   (:metaclass wknd::endpoint)
   (:method . :post)
-  (:route-parts "identify"))
+  (:route-parts "identify")
+  (:documentation "Endpoint for identifying oneself."))
 
 (defmethod wknd::handle ((req identify))
   (wknd:set-cookie "name" :value (name req))