From 6828cb461404126aa0c334fe2b669d435304f73e Mon Sep 17 00:00:00 2001 From: Russ Tyndall Date: Tue, 19 Jan 2010 10:22:53 -0500 Subject: [PATCH] allow setting the odbc::*time-conversion-function* to work by specifying the output type of timestamps to :time instead of T (which caused an after the fact conversion to string) --- db-odbc/odbc-dbi.lisp | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/db-odbc/odbc-dbi.lisp b/db-odbc/odbc-dbi.lisp index 0b88ee2..4611cfe 100644 --- a/db-odbc/odbc-dbi.lisp +++ b/db-odbc/odbc-dbi.lisp @@ -465,10 +465,11 @@ This makes the functions db-execute-command and db-query thread safe." (#.odbc::$SQL_C_SSHORT :short) (#.odbc::$SQL_C_STINYINT :short) (#.odbc::$SQL_C_SBIGINT #.odbc::$ODBC-BIG-TYPE) + (#.odbc::$SQL_C_TYPE_TIMESTAMP :time) (#.odbc::$SQL_C_CHAR - (or (case (aref column-sql-types i) - (#.odbc::$SQL_NUMERIC :double)) - T)) + (case (aref column-sql-types i) + (#.odbc::$SQL_NUMERIC :double) + (t t))) (t t))) (t t))))) query) -- 2.34.1