14 Sep 2007 Kevin Rosenberg <kevin@rosenberg.net>

[clsql.git] / sql / fdml.lisp

diff --git a/sql/fdml.lisp b/sql/fdml.lisp
index 34062620389844cb3bf61ba93650db782b6b2db5..dc725f41e03623a0999363b758f7d5ca30fa1f98 100644 (file)
--- a/sql/fdml.lisp
+++ b/sql/fdml.lisp
@@ -140,6 +140,7 @@ columns."
   (let ((insert (make-instance 'sql-insert :into into)))
     (with-slots (attributes values query)
       insert
+
       (cond ((and vals (not attrs) (not query) (not av-pairs))
              (setf values vals))
             ((and vals attrs (not subquery) (not av-pairs))