add most importtant pages

2024-09-01 14:29:08 -07:00
parent 823c6a1ac9
commit b098c63351
19 changed files with 476 additions and 5 deletions
--- a/templates/page.lisp
+++ b/templates/page.lisp
@ -0,0 +1,15 @@
+(load "./templates/header.lisp")
+(load "./templates/footer.lisp")
+
+(defun page (title html)
+    `(html (:lang "en") 
+           (head ()
+                 (meta (:http-equiv "content-type" :content "text/html; charset=utf-8"))
+                 (meta (:name "viewport" :content "width=device-width, initial-scale=1"))
+                 (link (:rel "stylesheet" :href "/style.css"))
+                 (title () ,title))
+           (body () 
+                 ,(header)
+                 (main () 
+                       ,html)
+                 ,(footer))))