diff options
Diffstat (limited to 'site/home.lisp')
| -rw-r--r-- | site/home.lisp | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/site/home.lisp b/site/home.lisp index b96b52e..dcf929a 100644 --- a/site/home.lisp +++ b/site/home.lisp @@ -1,10 +1,8 @@ (in-package #:vampire) -(defun home-page (user) - (format nil "hey ~a" (user-name user))) - -(wknd:defendpoint home +(wknd:defendpoint home.html :using user-known :get :route "" :returns "text/html" - :handle (home-page user)) + :handle (page (:title "V A M P I R E") + (:p "hey " (user-name user)))) |