Update-slots-from-instance now throws an exception if it generates an update without...

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

diff --git a/sql/generic-odbc.lisp b/sql/generic-odbc.lisp
index e4c37529f2e07a32778f46fe01b3ffa0d1c0e331..766606035a3c2cc2f64e6e5d3f194becce3ff28e 100644 (file)
--- a/sql/generic-odbc.lisp
+++ b/sql/generic-odbc.lisp
@@ -76,10 +76,6 @@
                                         (db-type (eql :mssql)))
   (declare (ignore args database))
   "DATETIME")
-(defmethod database-get-type-specifier ((type (eql 'date)) args database
-                                        (db-type (eql :mssql)))
-  (declare (ignore args database))
-  "DATETIME")
 
 (defmethod database-get-type-specifier ((type (eql 'boolean)) args database
                                         (db-type (eql :mssql)))