diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..7a1b5cd --- /dev/null +++ b/.gitignore @@ -0,0 +1,2 @@ +src/*.html +src/*.css diff --git a/src/index.lisp b/src/index.lisp new file mode 100644 index 0000000..7eba477 --- /dev/null +++ b/src/index.lisp @@ -0,0 +1,23 @@ +(ql:quickload "spinneret") +(ql:quickload "lass") + + + +(defun generate-html () + (spinneret:with-html-string + (:html + (:head + (:link :rel "style.css") + (:body + (:div :class "body" + (:h1 "welcome") + (:p "hello, im cath and i exist"))))))) + + + +(defun write-html-to-file () + (with-open-file (output "index.html" + :direction :output + :if-exists :overwrite + :if-does-not-exist :create) + (format output (generate-html))))