(sql-execute stmt conn)))
(defun sql-query (cmd conn &key (result-types :auto))
- (clsql:query cmd :database conn :result-types result-types))
+ (clsql:query cmd :database conn :result-types result-types :field-names nil))
(defun sql-execute (cmd conn)
(clsql:execute-command cmd :database conn))