diff options
Diffstat (limited to 'src/transactions.lisp')
-rw-r--r-- | src/transactions.lisp | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/transactions.lisp b/src/transactions.lisp index 61f7f9b..3372520 100644 --- a/src/transactions.lisp +++ b/src/transactions.lisp @@ -30,3 +30,7 @@ :reported reported :reporter reporter))) (push rumor (rumors adventure))))) + +(defun add-adventure-seer (player adventure) + (db:with-transaction () + (push player (seers adventure)))) |