projects
/
clsql.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
4e0ab71
)
keep a reference to the original connection spec used to create
author
Ryan Davis
<ryan@acceleration.net>
Thu, 7 Mar 2013 16:19:36 +0000
(11:19 -0500)
committer
Ryan Davis
<ryan@acceleration.net>
Thu, 7 Mar 2013 16:19:39 +0000
(11:19 -0500)
`odbc-database` connections
This information is useful of introspection later down the line.
db-odbc/odbc-sql.lisp
patch
|
blob
|
history
diff --git
a/db-odbc/odbc-sql.lisp
b/db-odbc/odbc-sql.lisp
index 961da0b203631c2579279d7c6bd9e336418d0621..447795c656ce55cd8cee9f8fbff337f13af124fd 100644
(file)
--- 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