diff options
author | Grant Shangreaux <shoshin@cicadas.surf> | 2023-01-24 22:02:17 -0600 |
---|---|---|
committer | Grant Shangreaux <shoshin@cicadas.surf> | 2023-01-24 22:02:17 -0600 |
commit | ffa213f6f825479df7b544f23d1240dd1c86f10f (patch) | |
tree | ed62fb361048774e252c7a1f80c1da325bc8a7de /pages.lisp | |
parent | 01c9197114270d153308226a1588de78ed05ee29 (diff) |
Add: doorkeeper :message param to pass info to user
Basic handling for when a hero name is entered but does not exist in
the store. The /tavern-door endpoint will parse a NAME query param and
the doorkeeper says they've never heard of them.
Diffstat (limited to 'pages.lisp')
-rw-r--r-- | pages.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -19,9 +19,9 @@ (:input :name "NAME") (:button :type "submit" "Pray To The Goddess")))) -(defun doorkeeper () +(defun doorkeeper (&key (message "Wot's yer name 'ero?")) (with-page (:title "Tavern Door") - (:h1 "Wot's yer name 'ero?") + (:h1 message) (:form :method "POST" :action "/tavern-door" (:label :for "NAME" "Thy Hero's Appelation:") (:input :name "NAME") |