;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
;;;; *************************************************************************
-(in-package #:clsql-base-sys)
+(in-package #:clsql-base)
;;; Query
that expression and a list of field names selected in sql-exp."))
(defmethod query ((query-expression string) &key (database *default-database*)
- (result-types nil) (flatp nil) (field-names t))
+ (result-types :auto) (flatp nil) (field-names t))
(record-sql-action query-expression :query database)
(multiple-value-bind (rows names) (database-query query-expression database result-types
field-names)