summaryrefslogtreecommitdiff
path: root/transactions.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'transactions.lisp')
-rw-r--r--transactions.lisp22
1 files changed, 0 insertions, 22 deletions
diff --git a/transactions.lisp b/transactions.lisp
deleted file mode 100644
index acfa8c2..0000000
--- a/transactions.lisp
+++ /dev/null
@@ -1,22 +0,0 @@
-;;;; transactions.lisp -- data store transactions for dnd
-
-(in-package :dnd)
-
-(defun birth-from-the-goddess-loins (player name)
- (db:with-transaction ()
- (make-instance 'hero :name name :player player)))
-
-(defun new-sesh (player)
- (db:with-transaction () (make-instance 'session :player player)))
-
-(defun destroy-sesh (session)
- (db:with-transaction ()
- (db:delete-object session)))
-
-(defun register-player (nick)
- (db:with-transaction ()
- (make-instance 'player :nick nick)))
-
-(defun create-campaign (player title)
- (db:with-transaction ()
- (make-instance 'campaign :title title :creator player)))