r10077: * multiple: Apply patch from Joerg Hoehle with multiple

[clsql.git] / tests / utils.lisp

diff --git a/tests/utils.lisp b/tests/utils.lisp
index bacc9ff92d18af91254862a2ebbb771e2c645735..eb10ec33fe989ae5cd7751f0bd4a48af1ea63972 100644 (file)
--- a/tests/utils.lisp
+++ b/tests/utils.lisp
@@ -7,7 +7,7 @@
 ;;;; Author:  Kevin M. Rosenberg
 ;;;; Created: Mar 2002
 ;;;;
 ;;;; Author:  Kevin M. Rosenberg
 ;;;; Created: Mar 2002
 ;;;;

-;;;; $Id: tests.lisp 8926 2004-04-10 21:12:52Z kevin $
+;;;; $Id$

 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002-2004 by Kevin M. Rosenberg
 ;;;;
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002-2004 by Kevin M. Rosenberg
 ;;;;


@@ -24,9 +24,8 @@
                 :type "config"))
 
 (defvar +all-db-types+
                 :type "config"))
 
 (defvar +all-db-types+

-    #-clisp '(:postgresql :postgresql-socket :mysql :sqlite :odbc :oracle
-             #+allegro :aodbc)
-    #+clisp '(:sqlite))
+  '(:postgresql :postgresql-socket :mysql :sqlite :odbc :oracle
+    #+allegro :aodbc))

 
 (defclass conn-specs ()
   ((aodbc :accessor aodbc-spec :initform nil)
 
 (defclass conn-specs ()
   ((aodbc :accessor aodbc-spec :initform nil)