diff --git a/src/honey/sql.cljc b/src/honey/sql.cljc index 824ef2a..011ae52 100644 --- a/src/honey/sql.cljc +++ b/src/honey/sql.cljc @@ -60,7 +60,7 @@ :select :select-distinct :select-distinct-on :select-top :select-distinct-top :distinct :expr :exclude :rename :into :bulk-collect-into - :insert-into :replace-into :update :delete :delete-from :truncate + :insert-into :replace-into :update :delete :delete-from :erase-from :truncate :columns :set :from :using :join-by :join :left-join :right-join :inner-join :outer-join :full-join @@ -1638,6 +1638,7 @@ :update (check-where #'format-selector) :delete (check-where #'format-selects) :delete-from (check-where #'format-selector) + :erase-from (check-where #'format-selector) :truncate #'format-truncate :columns #'format-columns :set #'format-set-exprs diff --git a/test/honey/sql/xtdb_test.cljc b/test/honey/sql/xtdb_test.cljc index b4f25c0..6b37769 100644 --- a/test/honey/sql/xtdb_test.cljc +++ b/test/honey/sql/xtdb_test.cljc @@ -62,3 +62,9 @@ (deftest dotted-array-access-tests (is (= ["SELECT (a.b).c"] (sql/format '{select (((. (nest :a.b) :c)))})))) + +(deftest erase-from-test + (is (= ["ERASE FROM foo WHERE foo.id = ?" 42] + (-> {:erase-from :foo + :where [:= :foo.id 42]} + (sql/format)))))