X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=db-odbc%2Fodbc-api.lisp;h=b20a48aba469295b11880ca8326fec7c196d9d29;hp=9ebdb3e6e506475104869f55624219851192b0e8;hb=8a0c49946e9569a6402beaa8d2194ceabf9d3d04;hpb=f90abf736b38b770d40fa6b65a48b553302b17a4

diff --git a/db-odbc/odbc-api.lisp b/db-odbc/odbc-api.lisp
index 9ebdb3e..b20a48a 100644
--- a/db-odbc/odbc-api.lisp
+++ b/db-odbc/odbc-api.lisp
@@ -226,7 +226,8 @@ May be locally bound to something else if a certain type is necessary.")
        (with-error-handling
            (:hdbc hdbc)
            (SQLDriverConnect hdbc
-                             window-handle
+                             (or window-handle
+                                 +null-handle-ptr+)
                              connection-ptr $SQL_NTS
                              completed-connection-string-ptr $SQL_MAX_CONN_OUT
                              completed-connection-length