diff options
| author | colin <colin@cicadas.surf> | 2024-06-01 05:59:17 -0700 |
|---|---|---|
| committer | colin <colin@cicadas.surf> | 2024-06-01 05:59:17 -0700 |
| commit | 132bb57d594894f7c9bdfea23e17971028acaedf (patch) | |
| tree | 37ee92488f3bc925a729eba474774d6369e7d6e0 /site/home.lisp | |
| parent | a98270e2f8d90a9026394aff0aaa104824f045fa (diff) | |
Add: page macro, css. Refactor: endpoints for consistent naming
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)))) |