summaryrefslogtreecommitdiff
path: root/src/pages/doorkeeper.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/pages/doorkeeper.lisp')
-rw-r--r--src/pages/doorkeeper.lisp19
1 files changed, 0 insertions, 19 deletions
diff --git a/src/pages/doorkeeper.lisp b/src/pages/doorkeeper.lisp
deleted file mode 100644
index 15774fb..0000000
--- a/src/pages/doorkeeper.lisp
+++ /dev/null
@@ -1,19 +0,0 @@
-;;;; pages/doorkeeper.lisp -- announce yourself and enter the hero's tavern
-
-(in-package :dnd)
-
-;;; DOORKEEPER CLASS
-(defclass/std doorkeeper ()
- ((message)))
-
-;; the t specialization works for all render targets
-(defrender t ((page doorkeeper))
- (with-page (:title "Tavern Door")
- (:h1 (message page))
- (:form :method "POST" :action "/tavern-door"
- (:label :for "NICKNAME" "Wut's yer handle?:")
- (:input :name "NICKNAME") (:br)
- (:button :type "submit" "Announce Thyself"))
- (:h2 "Eh? Ye need to register for admission?")
- (:a :href "/join" "Follow me...")))
-