# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1461866572 0
# Node ID 3c8bbc73e9e1b7155580ddb6ce2e5ee45619d815
# Parent  1184d75b21fed86d2bf2e994c32227be47ef377b
Fix fresh db macro

diff -r 1184d75b21fe -r 3c8bbc73e9e1 src/wam/ui.lisp
--- a/src/wam/ui.lisp	Sun Apr 24 14:00:54 2016 +0000
+++ b/src/wam/ui.lisp	Thu Apr 28 18:02:52 2016 +0000
@@ -13,7 +13,7 @@
      ,@body))
 
 (defmacro with-fresh-database (&body body)
-  `(with-database (make-database) ,body))
+  `(with-database (make-database) ,@body))
 
 
 (defun add-rules (rules)