aboutsummaryrefslogtreecommitdiffhomepage
path: root/site
diff options
context:
space:
mode:
Diffstat (limited to 'site')
-rw-r--r--site/home.lisp20
1 files changed, 11 insertions, 9 deletions
diff --git a/site/home.lisp b/site/home.lisp
index f84700e..c8fe9d1 100644
--- a/site/home.lisp
+++ b/site/home.lisp
@@ -5,12 +5,14 @@
:get :route ""
:returns "text/html"
:handle (page (:title "V A M P I R E")
- (:p "hey " (user-name user))
- (:div
- (:form :method "POST" :action "/invites"
- (:p "Initiate an invitation...")
- (:button :type "submit" "Bite Someone")))
- (:br)
- (:h2 "Outstanding inBites:")
- (:ul (dolist (i (invites-by-maker user))
- (:li (key i))))))
+ (:div :id "main"
+ (:h1 "hey " (user-name user))
+ (:br)
+ (:div
+ (:form :method "POST" :action "/invites"
+ (:p "Initiate an invitation...")
+ (:button :type "submit" "Bite Someone")))
+ (:br)
+ (:h2 "Outstanding inBites:")
+ (:ul (dolist (i (invites-by-maker user))
+ (:li (key i)))))))