X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=db-postgresql%2Fpostgresql-sql.lisp;h=51d5d0f3cea0cd167f71127d02f7bf67d55ac66e;hb=2fb4a4ccc311f37b0f5e993976a4d7d4f667f4e3;hp=462c447486035c5d806febd3259dbd8ed17e9f0e;hpb=fe6d36c16c61c855fc3b0c0c7c07f3cf3de4241d;p=clsql.git

diff --git a/db-postgresql/postgresql-sql.lisp b/db-postgresql/postgresql-sql.lisp
index 462c447..51d5d0f 100644
--- a/db-postgresql/postgresql-sql.lisp
+++ b/db-postgresql/postgresql-sql.lisp
@@ -210,7 +210,7 @@
                  :database database
                  :expression sql-expression
                  :message (tidy-error-message (PQerrorMessage conn-ptr)
-                                              (encoding databse))))
+                                              (encoding database))))
         (unwind-protect
             (case (PQresultStatus result)
               (#.pgsql-exec-status-type#command-ok