From f77d85fd5840378b71d2e29e4092e48c1a42c8ca Mon Sep 17 00:00:00 2001 From: Ryan Davis Date: Thu, 7 Mar 2013 11:19:36 -0500 Subject: [PATCH] keep a reference to the original connection spec used to create `odbc-database` connections This information is useful of introspection later down the line. --- db-odbc/odbc-sql.lisp | 1 + 1 file changed, 1 insertion(+) diff --git a/db-odbc/odbc-sql.lisp b/db-odbc/odbc-sql.lisp index 961da0b..447795c 100644 --- a/db-odbc/odbc-sql.lisp +++ b/db-odbc/odbc-sql.lisp @@ -42,6 +42,7 @@ (let ((db (make-instance 'odbc-database :name (database-name-from-spec connection-spec :odbc) :database-type :odbc + :connection-spec connection-spec :dbi-package (find-package '#:odbc-dbi) :odbc-conn (odbc-dbi:connect :user user -- 2.34.1