address #483 (still needs tests and docs)

2023-04-06 22:49:13 -07:00 · 2023-04-06 22:49:13 -07:00 · 858d157863
commit 858d157863
parent 025e445d5d
1 changed files with 5 additions and 0 deletions
--- a/src/honey/sql.cljc
+++ b/src/honey/sql.cljc
@ -1545,6 +1545,11 @@
    (fn [_ [n units]]
      (let [[sql & params] (format-expr n)]
        (into [(str "INTERVAL " sql " " (sql-kw units))] params)))
+    :join
+    (fn [_ [e & js]]
+      (let [[sqls params] (reduce-sql (cons (format-expr e)
+                                            (map format-dsl js)))]
+        (into [(str "(" (str/join " " sqls) ")")] params)))
    :lateral
    (fn [_ [clause-or-expr]]
      (if (map? clause-or-expr)