diff options
-rw-r--r-- | src/clojure_sql/compiler.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/clojure_sql/compiler.clj b/src/clojure_sql/compiler.clj index 881a794..5bec649 100644 --- a/src/clojure_sql/compiler.clj +++ b/src/clojure_sql/compiler.clj @@ -277,8 +277,8 @@ (defn update! [db {:keys [tables fields where joins]} partial-record] (assert (= (count tables) 1) "Cannot delete from a multiple-table query") - (assert (seq (set/intersection (keys partial-record) - (keys fields))) "At least one field must be being updated") + (assert (seq (set/intersection (set (keys partial-record)) + (set (keys fields)))) "At least one field must be being updated") (let [fix-expr (partial walk/prewalk (fn [x] (if (vector? x) (second x) |