X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fgeneric-odbc.lisp;h=06338ae605013a9fec962504f8deb7d3f65b7f19;hb=5bfa219c5e3b387b9dd7c819441f0182ccb16dc8;hp=b83e8cacd854f9f370a238a8f3bf4fbd67f53a59;hpb=5148be446aee32ec705beac3fbba35f499df4fd4;p=clsql.git

diff --git a/sql/generic-odbc.lisp b/sql/generic-odbc.lisp
index b83e8ca..06338ae 100644
--- a/sql/generic-odbc.lisp
+++ b/sql/generic-odbc.lisp
@@ -67,6 +67,7 @@
 	       query-expression :db (odbc-conn database)
 	       :result-types result-types
 	       :column-names field-names)
+    #+ignore
     (error ()
       (error 'sql-database-data-error
 	     :database database
@@ -178,8 +179,6 @@
     (loop for row in rows
 	collect (fourth row))))
 
-
-
 (defmethod database-attribute-type ((attribute string) (table string) (database generic-odbc-database)
 				    &key (owner nil))
   (declare (ignore owner))