remove debugging
This commit is contained in:
parent
d32d16e8e2
commit
ff760e12de
1 changed files with 0 additions and 1 deletions
|
|
@ -318,7 +318,6 @@
|
||||||
(str "SELECT " (-handle-select fields sql-map)))
|
(str "SELECT " (-handle-select fields sql-map)))
|
||||||
|
|
||||||
(defmethod format-clause :select-top [[_ [limit-count fields]] sql-map]
|
(defmethod format-clause :select-top [[_ [limit-count fields]] sql-map]
|
||||||
(println "limit-count = " limit-count "; fields = " fields "; sql-map = " sql-map)
|
|
||||||
(str "SELECT TOP " limit-count " " (-handle-select fields sql-map)))
|
(str "SELECT TOP " limit-count " " (-handle-select fields sql-map)))
|
||||||
|
|
||||||
(defmethod format-clause :from [[_ tables] _]
|
(defmethod format-clause :from [[_ tables] _]
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue