From ce470567c4421da7d073685cf845fdc4448aadc0 Mon Sep 17 00:00:00 2001
From: colin <colin@cicadas.surf>
Date: Wed, 19 Jun 2024 13:13:42 -0700
Subject: Rename classes with convention

---
 site/login.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'site/login.lisp')

diff --git a/site/login.lisp b/site/login.lisp
index 3f7e8fa..d859e0d 100644
--- a/site/login.lisp
+++ b/site/login.lisp
@@ -5,7 +5,7 @@
   :returns "text/html"
   :handle (login-page))
 
-(wknd:defendpoint login-user
+(wknd:defendpoint login.user
   :post :route "login"
   :parameters
   (name string)
@@ -26,7 +26,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 'login-user)
+          (:form :method "POST" :action (wknd:route-to 'login.user)
                  (:input :placeholder "Name" :name "name")
                  (:br)
                  (:input :placeholder "Password" :type "password" :name "password")
-- 
cgit v1.2.3