diff options
Diffstat (limited to 'transactions.lisp')
| -rw-r--r-- | transactions.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/transactions.lisp b/transactions.lisp index 2c65434..35e817c 100644 --- a/transactions.lisp +++ b/transactions.lisp @@ -2,9 +2,9 @@ (in-package :dnd) -(defun birth-from-the-goddess-loins (name) +(defun birth-from-the-goddess-loins (player name) (db:with-transaction () - (make-instance 'hero :name name))) + (make-instance 'hero :name name :player player))) (defun new-sesh (player) (db:with-transaction () (make-instance 'session :player player))) |