diff --git a/src/honey/sql.cljc b/src/honey/sql.cljc index 974e2d4..b3a1645 100644 --- a/src/honey/sql.cljc +++ b/src/honey/sql.cljc @@ -936,7 +936,7 @@ (defn- format-values [k xs] (let [first-xs (when (sequential? xs) (first (drop-while ident? xs)))] - (cond (or (identical? :default xs) (= 'default xs)) + (cond (and (ident? xs) (contains? #{:default 'default} xs)) [(str (sql-kw xs) " " (sql-kw k))] (empty? xs) [(str (sql-kw k) " ()")]