r8811: add support for usql backend, integrate Marcus Pearce <ek735@soi.city.ac.uk...

[clsql.git] / base / initialize.lisp

diff --git a/base/initialize.lisp b/base/initialize.lisp
index ffa08b29d7331fe6bb2a94d12c823bc57e0f1a12..8e98d5e2c3d206df270750d37a41df8e7d610b73 100644 (file)
--- a/base/initialize.lisp
+++ b/base/initialize.lisp
@@ -45,9 +45,9 @@ to initialize-database-type.")
   "Initialize the given database-type, if it is not already
 initialized, as indicated by `*initialized-database-types*'."
   (if (member database-type *initialized-database-types*)
-      t
+      database-type
       (when (database-initialize-database-type database-type)
        (push database-type *initialized-database-types*)
-       t)))
+       database-type)))