r9365: 15 May 2004 Kevin Rosenberg (kevin@rosenberg.net)

[clsql.git] / tests / test-init.lisp

diff --git a/tests/test-init.lisp b/tests/test-init.lisp
index d98cbf226e4e2ce2490202b7ba0f559b6c8ac5fc..7d7273f5c07460797f386372b53e63dc9c6e71c8 100644 (file)
--- a/tests/test-init.lisp
+++ b/tests/test-init.lisp
@@ -171,7 +171,8 @@
            :db-info (:join-class address
                                  :home-key aaddressid
                                  :foreign-key addressid
-                                 :retrieval :deferred)))
+                                 :retrieval :deferred
+                                 :set nil)))
   (:base-table "ea_join"))
 
 (defun test-connect-to-database (db-type spec)