Craig Oates
2 years ago
1 changed files with 26 additions and 0 deletions
@ -0,0 +1,26 @@ |
|||||||
|
(in-package :ritherdon-archive/models) |
||||||
|
|
||||||
|
(defclass user () |
||||||
|
((username |
||||||
|
:accessor username |
||||||
|
:initarg :username |
||||||
|
:initform nil |
||||||
|
:type (or string null) |
||||||
|
:col-type :text) |
||||||
|
|
||||||
|
(display-name |
||||||
|
:accessor display-name |
||||||
|
:initarg :display-name |
||||||
|
:initform nil |
||||||
|
:type (or string null) |
||||||
|
:col-type :text) |
||||||
|
|
||||||
|
(password |
||||||
|
:accessor password |
||||||
|
:initarg :password |
||||||
|
:initform nil |
||||||
|
:type (or string null) |
||||||
|
:col-type :text)) |
||||||
|
|
||||||
|
(:metaclass mito:dao-table-class) |
||||||
|
(:documentation "Account information for users to log-in to the website..")) |
Loading…
Reference in new issue