Browse Source

fix: nested queries bugs

close #2218
Tienson Qin 4 years ago
parent
commit
99db2bd503
1 changed files with 5 additions and 1 deletions
  1. 5 1
      src/main/frontend/db/query_dsl.cljs

+ 5 - 1
src/main/frontend/db/query_dsl.cljs

@@ -191,7 +191,11 @@
                             (apply concat clauses)
 
                             :else
-                            (->> (map #(cons 'and (seq %)) clauses)
+                            (->> (map (fn [result]
+                                        (let [result (if (vector? (ffirst result))
+                                                       (apply concat result)
+                                                       result)]
+                                          (cons 'and (seq result)))) clauses)
                                  (apply list fe)))
 
                           :else