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/html.lisp | |
| parent | a98270e2f8d90a9026394aff0aaa104824f045fa (diff) | |
Add: page macro, css. Refactor: endpoints for consistent naming
Diffstat (limited to 'site/html.lisp')
| -rw-r--r-- | site/html.lisp | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/site/html.lisp b/site/html.lisp new file mode 100644 index 0000000..d1d0f1a --- /dev/null +++ b/site/html.lisp @@ -0,0 +1,14 @@ +(in-package #:vampire) + + +(defmacro page ((&key (title "") (csspath "/css/style.css")) &body body) + `(spinneret:with-html-string + (:doctype) + (:head + (:title ,title) + (:meta :charset "UTF-8") + (:meta :name "viewport" :content "width=device-width, initial-scale=1.0") + (:link :rel "stylesheet" :href ,csspath)) + (:body + ,@body))) + |