From aee7f487f97c10c15b6c7b48156cc95db19d9137 Mon Sep 17 00:00:00 2001
From: Grant Shoshin Shangreaux <shoshin@cicadas.surf>
Date: Sat, 7 Jan 2023 11:12:15 -0600
Subject: First Draft of hero creation and login

---
 model.lisp | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'model.lisp')

diff --git a/model.lisp b/model.lisp
index 8605ace..46bf4e3 100644
--- a/model.lisp
+++ b/model.lisp
@@ -62,6 +62,16 @@
     :documentation "Salt for this hero's password hash."))
   (:metaclass db:persistent-class))
 
+;; TODO expiration?
+(defclass session (db:store-object)
+  ((hero :reader session-hero
+	 :initarg :hero)
+   (id :reader session-id
+       :initform (nuid)
+       :index-type idx:string-unique-index
+       :index-reader session-with-id))
+  (:metaclass db:persistent-class))
+
 ;; aka an issue
 ;; (defclass monster (can-equip has-uid)
 ;;   ((name)
-- 
cgit v1.2.3