diff --git a/src/models/archive.lisp b/src/models/archive.lisp index ff6bffd..24588a8 100644 --- a/src/models/archive.lisp +++ b/src/models/archive.lisp @@ -23,6 +23,20 @@ :initform :null :accessor search-id-of) + (month + :documentation "The month the artwork was published." + :col-type (or :text :null) + :initarg :month + :initform :null + :accessor month-of) + + (year + :documentation "The year the artwork was published." + :col-type (or :integer :null) + :initarg :year + :initform :null + :accessor year-of) + (slug :documentation "The slug, used as part of the URL, to access the entry." :col-type (or :text :null)