diff options
| -rw-r--r-- | src/game/abstract.lisp | 8 | ||||
| -rw-r--r-- | src/player.lisp | 7 |
2 files changed, 7 insertions, 8 deletions
diff --git a/src/game/abstract.lisp b/src/game/abstract.lisp index f54621e..d491dd8 100644 --- a/src/game/abstract.lisp +++ b/src/game/abstract.lisp @@ -2,15 +2,7 @@ (in-package :dnd) - ;;; PERSISTENT MIXINS -(defclass has-uid () - ((nuid :reader uid - :initform (nuid) - :index-type idx:string-unique-index - :index-reader object-with-uid)) - (:metaclass db:persistent-class)) - (defclass can-equip () ((equipment-table :initform nil diff --git a/src/player.lisp b/src/player.lisp index db78e57..11cd2b9 100644 --- a/src/player.lisp +++ b/src/player.lisp @@ -4,6 +4,13 @@ ;;; MODEL CLASSES +(defclass has-uid () + ((nuid :reader uid + :initform (nuid) + :index-type idx:string-unique-index + :index-reader object-with-uid)) + (:metaclass db:persistent-class)) + (defclass player (db:store-object has-uid) ((nick :reader nickname |