diff options
author | Grant Shoshin Shangreaux <shoshin@cicadas.surf> | 2023-04-01 08:58:23 -0500 |
---|---|---|
committer | Grant Shoshin Shangreaux <shoshin@cicadas.surf> | 2023-04-01 08:58:23 -0500 |
commit | 20e0bb168032e2e2aa95b08e2dbc9bedced62df3 (patch) | |
tree | cd5829ac1c19d3b186cef5fd5947d247e74f159e /src/model.lisp | |
parent | 1e942dd0c26b0709fb8878588c072e50020eec34 (diff) |
WIP mini-marathon
Diffstat (limited to 'src/model.lisp')
-rw-r--r-- | src/model.lisp | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/model.lisp b/src/model.lisp index e44d3b9..f8d19bc 100644 --- a/src/model.lisp +++ b/src/model.lisp @@ -157,6 +157,9 @@ (:metaclass db:persistent-class) (:documentation "A adventure is a container of quests. Adventures are expected to be engaged with on a particular schedule, and are run by particular people.")) +(defun adventure-seers (adventure) + (cons (creator adventure) (seers adventure))) + (defclass rumor (game-object) ((reporter :reader reporter |