add most importtant pages

This commit is contained in:
gnat
2024-09-01 14:29:08 -07:00
parent 823c6a1ac9
commit b098c63351
19 changed files with 476 additions and 5 deletions

14
templates/header.lisp Normal file
View File

@ -0,0 +1,14 @@
(defun header ()
'(header ()
(nav ()
(ul ()
(li ()
(h1 () "$[(for i in {0..10}; do echo natalieee.net; done; echo catalieee.net) | shuf -n1]"))
(li ()
(a (:href "/") "home"))
(li ()
(a (:href "..") "back"))
(li ()
(a (:href "/html/site-info.html") "site info"))
(li ()
(a (:href "/html/natalie-info.html") "natalie info"))))))