Skip to content

Commit 10dc346

Browse files
committed
Use seek instead of find, the latter already exists in clojure.core
1 parent bc22338 commit 10dc346

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

src/refactor_nrepl/ns/clean_ns.clj

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -36,13 +36,13 @@
3636
(assert-no-exclude-clause (core/get-ns-component ns-form :use))
3737
ns-form)
3838

39-
(defn- find
39+
(defn- seek
4040
"Find the first element in coll that satisfies pred?"
4141
[pred? coll]
4242
(reduce (fn [_ x] (when (pred? x) (reduced x))) nil coll))
4343

4444
(defn clean-ns [{:keys [path relative-path]}]
45-
(let [path (find #(and % (.exists (io/file %)))
45+
(let [path (seek #(and % (.exists (io/file %)))
4646
[path relative-path])]
4747
(assert (core/source-file? path))
4848
;; Prefix notation not supported in cljs.

0 commit comments

Comments
 (0)