r9072: fix variable name

[clsql.git] / db-odbc / odbc-sql.lisp

diff --git a/db-odbc/odbc-sql.lisp b/db-odbc/odbc-sql.lisp
index 1d392729efc490c2c5f7482a60de765cc5c8e87b..43bcfbb7b64b43453997f414b1b7a522e61dd554 100644 (file)
--- a/db-odbc/odbc-sql.lisp
+++ b/db-odbc/odbc-sql.lisp
@@ -52,6 +52,7 @@
          db)
     (clsql-error (e)
       (error e))
+    #+ignore
     (error ()  ;; Init or Connect failed
       (error 'clsql-connect-error
             :database-type database-type
@@ -103,6 +104,7 @@
       (odbc-dbi:sql sql-expression :db (database-odbc-conn database))
     (clsql-error (e)
       (error e))
+    #+ignore
     (error ()
       (error 'clsql-sql-error
             :database database
@@ -132,6 +134,7 @@
         (length column-names)
         nil ;; not able to return number of rows with odbc
         ))
+    #+ignore
     (error ()
       (error 'clsql-sql-error
             :database database