From 68d30b9c81c4e099e0111fe0bbb33715dd572e8c Mon Sep 17 00:00:00 2001 From: Grant Shangreaux Date: Sun, 23 Jun 2024 16:42:34 -0500 Subject: [109] Add: logout action and some session endpoint refactor --- site/home.lisp | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'site/home.lisp') diff --git a/site/home.lisp b/site/home.lisp index 47d0f17..5267985 100644 --- a/site/home.lisp +++ b/site/home.lisp @@ -8,6 +8,11 @@ (:div :id "main" (:h1 "hey " (user-name user)) (:br) + (:div + (:form :method "POST" :action (wknd:route-to 'session.destroy) + (:button :type "submit" "Logout"))) + (:br) + (:br) (:div (:form :method "POST" :action (wknd:route-to 'create.invite) (:p "Initiate an invitation...") -- cgit v1.2.3