2024-01-30 10:16:17 +09:00
|
|
|
(defpackage #:hp/ui/layout
|
2024-01-30 00:48:47 +09:00
|
|
|
(:use #:cl)
|
2024-02-03 13:57:35 +09:00
|
|
|
(:local-nicknames (#:f #:flute))
|
2024-01-30 00:48:47 +09:00
|
|
|
(:export #:layout))
|
2024-01-30 10:16:17 +09:00
|
|
|
(in-package #:hp/ui/layout)
|
2024-01-30 00:48:47 +09:00
|
|
|
|
2024-02-03 13:57:35 +09:00
|
|
|
(f:define-element layout ()
|
|
|
|
(f:h
|
|
|
|
(html
|
|
|
|
(head
|
|
|
|
(title "skyizwhite.dev")
|
|
|
|
(script :src "/static/htmx.min.js")
|
|
|
|
(link :href "/static/main.css" :rel "stylesheet")
|
|
|
|
(link :href "/static/tailwind.css" :rel "stylesheet"))
|
|
|
|
(body :class "h-[100svh]"
|
|
|
|
f:children))))
|