From 555141f5d077a76f5bdd6ae83a2b3aee2c66f0c3 Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Mon, 16 Oct 2006 19:38:09 +0000 Subject: [PATCH] r11232: 16 Oct 2006 Kevin Rosenberg * Version 3.7.7 * db-postgresql/postgresql-sql.lisp: Remove uffi:convert-foreign-to-native wrapper since using cstring for PQresultErrorField --- ChangeLog | 6 ++++++ db-postgresql/postgresql-sql.lisp | 2 +- debian/changelog | 6 ++++++ 3 files changed, 13 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index cba4afe..179d233 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +16 Oct 2006 Kevin Rosenberg + * Version 3.7.7 + * db-postgresql/postgresql-sql.lisp: Remove + uffi:convert-foreign-to-native wrapper since using cstring for + PQresultErrorField + 16 Oct 2006 Kevin Rosenberg * Version 3.7.6 * db-postgresql/postgresql-api.lisp: Fix UFFI return type for diff --git a/db-postgresql/postgresql-sql.lisp b/db-postgresql/postgresql-sql.lisp index 2d74fc1..82f03e2 100644 --- a/db-postgresql/postgresql-sql.lisp +++ b/db-postgresql/postgresql-sql.lisp @@ -222,7 +222,7 @@ (error 'sql-database-data-error :database database :expression sql-expression - :error-id (uffi:convert-from-foreign-string (PQresultErrorField result +PG-DIAG-SQLSTATE+)) + :error-id (PQresultErrorField result +PG-DIAG-SQLSTATE+) :message (tidy-error-message (PQresultErrorMessage result))))) (PQclear result)))))) diff --git a/debian/changelog b/debian/changelog index b21953a..f51aa41 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,9 @@ +cl-sql (3.7.7-1) unstable; urgency=low + + * New upstream + + -- Kevin M. Rosenberg Mon, 16 Oct 2006 13:35:28 -0600 + cl-sql (3.7.6-1) unstable; urgency=low * New upstream -- 2.34.1