From b0115ef82880db63239c6532bb3b63d86b7658cb Mon Sep 17 00:00:00 2001
From: Grant Shangreaux <grant@unabridgedsoftware.com>
Date: Sun, 23 Jun 2024 17:19:06 -0500
Subject: [109] Clean: use VERB.NOUN form for session endpoints

---
 site/home.lisp    | 2 +-
 site/login.lisp   | 2 +-
 site/session.lisp | 4 ++--
 3 files changed, 4 insertions(+), 4 deletions(-)

(limited to 'site')

diff --git a/site/home.lisp b/site/home.lisp
index 5267985..0b02e0c 100644
--- a/site/home.lisp
+++ b/site/home.lisp
@@ -9,7 +9,7 @@
 		  (:h1 "hey " (user-name user))
 		  (:br)
 		  (:div
-		   (:form :method "POST" :action (wknd:route-to 'session.destroy)
+		   (:form :method "POST" :action (wknd:route-to 'destroy.session)
 			  (:button :type "submit" "Logout")))
 		  (:br)
 		  (:br)
diff --git a/site/login.lisp b/site/login.lisp
index 7d07bb2..cb1f82f 100644
--- a/site/login.lisp
+++ b/site/login.lisp
@@ -8,7 +8,7 @@
 (defun login-page ()
   (page (:title "V A M P I R E ~ LOGIN")
     (:div (:h1 "I vant to suck your blood")
-          (:form :method "POST" :action (wknd:route-to 'session.create)
+          (:form :method "POST" :action (wknd:route-to 'create.session)
                  (:input :placeholder "Name" :name "name")
                  (:br)
                  (:input :placeholder "Password" :type "password" :name "password")
diff --git a/site/session.lisp b/site/session.lisp
index 342d6d0..af02947 100644
--- a/site/session.lisp
+++ b/site/session.lisp
@@ -1,6 +1,6 @@
 (in-package #:vampire)
 
-(wknd:defendpoint session.create
+(wknd:defendpoint create.session
   :post :to "login"
   :parameters
   (name string)
@@ -20,7 +20,7 @@
     (print session)
     (wknd:set-cookie +session-cookie+ :value (key session))))
 
-(wknd:defendpoint session.destroy
+(wknd:defendpoint destroy.session
   :using user-known
   :post :to "logout"
   :handle (do>
-- 
cgit v1.2.3