summaryrefslogtreecommitdiff
path: root/site/home.lisp
blob: dcf929ac8e549bbfb48178c0b18060597c1b85d4 (plain)
1
2
3
4
5
6
7
8
(in-package #:vampire)

(wknd:defendpoint home.html
  :using user-known
  :get :route ""
  :returns "text/html"
  :handle (page (:title "V A M P I R E")
            (:p "hey " (user-name user))))