summaryrefslogtreecommitdiff
path: root/src/transactions.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/transactions.lisp')
-rw-r--r--src/transactions.lisp4
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))))