Handle directories passed on command line
This commit is contained in:
parent
10ee6bd63c
commit
556981ce94
1 changed files with 2 additions and 4 deletions
|
@ -32,10 +32,8 @@
|
|||
|
||||
(defn run [source-paths & args]
|
||||
(let [[options file-args usage-text] (apply (partial cli args) cli-specs)
|
||||
source-files (if (empty? file-args)
|
||||
(mapcat #(-> % io/file find-clojure-sources-in-dir)
|
||||
source-paths)
|
||||
file-args)]
|
||||
source-files (mapcat #(-> % io/file find-clojure-sources-in-dir)
|
||||
(if (empty? file-args) source-paths file-args))]
|
||||
(mapcat (fn [file] (try (check-file file :reporter (name-to-reporter (:reporter options)
|
||||
cli-reporter))
|
||||
(catch Exception e
|
||||
|
|
Loading…
Reference in a new issue