From 656e83d91137712db3d8165dbf23abb1b15b6c25 Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Mon, 3 May 2004 20:17:00 +0000 Subject: [PATCH] r9213: fix odbc/postgresql null value for strings --- ChangeLog | 6 +++++- db-odbc/odbc-api.lisp | 1 + 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index 1d20734..c252856 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,9 @@ 3 May 2004 Kevin Rosenberg (kevin@rosenberg.net) - * Version 2.10.8 + * db-odbc/odbc-api.lisp: Fix changing nil to "NIL" + for odbc/postgresql backend. + +3 May 2004 Kevin Rosenberg (kevin@rosenberg.net) + * Version 2.10.8 * base/conditions.lisp: Add *backend-warning-behavior* special variable. * db-postgresql-socket/postgresql-socket-sql.lisp: diff --git a/db-odbc/odbc-api.lisp b/db-odbc/odbc-api.lisp index e51f248..befda14 100644 --- a/db-odbc/odbc-api.lisp +++ b/db-odbc/odbc-api.lisp @@ -663,6 +663,7 @@ as possible second argument) to the desired representation of date/time/timestam ;; FIXME: this could be better optimized for types which use READ-FROM-STRING above (if (and (or (eq result-type t) (eq result-type :string)) + value (not (stringp value))) (write-to-string value) value))) -- 2.34.1