X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fgeneric-odbc.lisp;h=bd4d01cda033156bd6c0ff4aa0e6346cfca2a819;hb=d86f73be9a261b9c071ab905aeff5d1ee30a3f31;hp=e4c37529f2e07a32778f46fe01b3ffa0d1c0e331;hpb=85ec9eefa107bb000198c381ffba15c8f4bb086b;p=clsql.git

diff --git a/sql/generic-odbc.lisp b/sql/generic-odbc.lisp
index e4c3752..bd4d01c 100644
--- a/sql/generic-odbc.lisp
+++ b/sql/generic-odbc.lisp
@@ -76,10 +76,11 @@
                                         (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")
+  "SMALLDATETIME")
 
 (defmethod database-get-type-specifier ((type (eql 'boolean)) args database
                                         (db-type (eql :mssql)))