Check max, min, dissoc, disj, into, disj!, format for redundant call

tomdl89 · Dec 15, 2024 · 06bef95 · 06bef95
1 parent 97ea8e3
commit 06bef95
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 2 deletions.
diff --git a/src/clj_kondo/impl/config.clj b/src/clj_kondo/impl/config.clj
@@ -468,7 +468,14 @@
                              clojure.core/some->> cljs.core/some->>
                              clojure.core/partial cljs.core/partial
                              clojure.core/comp cljs.core/comp
-                             clojure.core/merge cljs.core/merge}
+                             clojure.core/merge cljs.core/merge
+                             clojure.core/max cljs.core/max
+                             clojure.core/min cljs.core/min
+                             clojure.core/dissoc cljs.core/dissoc
+                             clojure.core/disj cljs.core/disj
+                             clojure.core/into cljs.core/into
+                             clojure.core/disj!
+                             clojure.core/format}
       delayed-cfg (fn [config]
                     (let [cfg (get-in config [:linters :redundant-call])
                           include (some-> (:include cfg) set)

diff --git a/test/clj_kondo/redundant_call_test.clj b/test/clj_kondo/redundant_call_test.clj
@@ -7,7 +7,7 @@
   ^:replace {:linters {:redundant-call {:level :warning}}})
 
 (deftest redundant-call-test
-  (doseq [sym `[-> ->> some-> some->> partial comp merge]]
+  (doseq [sym `[-> ->> some-> some->> partial comp merge max min dissoc disj into format]]
     (is (empty? (lint! (format "(%s 1 identity)" sym) config))))
   (doseq [sym `[-> ->> cond-> cond->> some-> some->> partial comp merge]]
     (assert-submaps