r8885: pre 2.3.4

[clsql.git] / sql / sql.lisp

diff --git a/sql/sql.lisp b/sql/sql.lisp
index d154aee10f63e95d36331e400ac0392901091e53..6d1e375a6f57826171cf9621f4a0dea6d147c9c6 100644 (file)
--- a/sql/sql.lisp
+++ b/sql/sql.lisp
@@ -18,9 +18,9 @@
 
 
 (defmethod database-query-result-set ((expr %sql-expression) database
-                                      &key full-set types)
+                                      &key full-set result-types)
   (database-query-result-set (sql-output expr database) database
-                             :full-set full-set :types types))
+                             :full-set full-set :result-types result-types))
 
 (defmethod execute-command ((expr %sql-expression)
                             &key (database *default-database*))