aboutsummaryrefslogtreecommitdiffhomepage
path: root/home.lisp
diff options
context:
space:
mode:
authorcolin <colin@cicadas.surf>2024-09-20 19:12:34 -0700
committercolin <colin@cicadas.surf>2024-09-20 19:12:34 -0700
commit0900ae82605103b4ca1208afc55554e2e89abbce (patch)
treee3ae8167e5698a25e9832a4003fa420d45764d3a /home.lisp
parenta3eb0edbd315e6f1e97350b2d7e762bdbf5b23f9 (diff)
Add: announcementoldmain
Diffstat (limited to 'home.lisp')
-rw-r--r--home.lisp2
1 files changed, 2 insertions, 0 deletions
diff --git a/home.lisp b/home.lisp
index cac1c3b..173700c 100644
--- a/home.lisp
+++ b/home.lisp
@@ -135,6 +135,8 @@
(with-clog-create body
(div ()
(navigation-header ())
+(div (:class "row")
+ (p (:content "ANNOUNCEMENT: Vampire Sucks (ha ha). No really. It has been regularly refusing connections. You may have noticed a White Screen Of Death. I (colin) have been (very slowly) working on an improved application. Stay tuned: IMPROVEMENTS LAND IN OCTOBER 2024. Forthcoming new features: Comments! Search! Exploration!")))
(div (:class "row")
(div ()
(section (:pre :content (format nil "Welcome ~a" (user-name (session-user body)))))