summaryrefslogtreecommitdiff
path: root/model.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'model.lisp')
-rw-r--r--model.lisp10
1 files changed, 10 insertions, 0 deletions
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)