From adc55338c3bf10e87af43cf78c2c29b4e896fae5 Mon Sep 17 00:00:00 2001 From: Ryan Davis Date: Tue, 28 Aug 2012 14:36:09 -0400 Subject: [PATCH] use &body instead of &rest to aid emacs indentation --- sql/transaction.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/sql/transaction.lisp b/sql/transaction.lisp index a2fdda3..24465d1 100644 --- a/sql/transaction.lisp +++ b/sql/transaction.lisp @@ -93,7 +93,7 @@ is called on DATABASE which defaults to *DEFAULT-DATABASE*." (not (transaction-status (transaction database)))) (setf (transaction-status (transaction database)) :committed))) -(defmacro with-transaction ((&key (database '*default-database*)) &rest body) +(defmacro with-transaction ((&key (database '*default-database*)) &body body) "Starts a transaction in the database specified by DATABASE, which is *DEFAULT-DATABASE* by default, and executes BODY within that transaction. If BODY aborts or throws, DATABASE is rolled -- 2.34.1