projects
/
clsql.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r9549:
[clsql.git]
/
db-odbc
/
odbc-sql.lisp
diff --git
a/db-odbc/odbc-sql.lisp
b/db-odbc/odbc-sql.lisp
index e1ad0c234d03333177ae3c4798777880076ef1ef..385d378ee8adb9c084837503540e86f5775a2299 100644
(file)
--- a/
db-odbc/odbc-sql.lisp
+++ b/
db-odbc/odbc-sql.lisp
@@
-48,6
+48,9
@@
:password password
:data-source-name dsn))))
(store-type-of-connected-database db)
:password password
:data-source-name dsn))))
(store-type-of-connected-database db)
+ ;; Ensure this database type is initialized so can check capabilities of
+ ;; underlying database
+ (initialize-database-type :database-type database-type)
db)
(error () ;; Init or Connect failed
(error 'sql-connection-error
db)
(error () ;; Init or Connect failed
(error 'sql-connection-error