File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -389,17 +389,14 @@ present"
389389 (:uri (build/ns->location main-ns)))
390390 repl? (boolean (#{" -r" " --repl" } (first args)))
391391 cenv (env/default-compiler-env )]
392- (binding [ana/*verbose* (:verbose opts)]
393- (when ana/*verbose*
394- (util/debug-prn " Compiler options:" (pr-str opts)))
395- (if-let [path (:watch opts)]
396- (if repl?
397- (.start (Thread. #(watch-proc cenv path opts)))
398- (build/watch path opts cenv))
399- (build/build source opts cenv))
400- (when repl?
401- (repl-opt repl-env args
402- (assoc-in cfg [:options :compiler-env ] cenv))))))
392+ (if-let [path (:watch opts)]
393+ (if repl?
394+ (.start (Thread. #(watch-proc cenv path opts)))
395+ (build/watch path opts cenv))
396+ (build/build source opts cenv))
397+ (when repl?
398+ (repl-opt repl-env args
399+ (assoc-in cfg [:options :compiler-env ] cenv)))))
403400
404401(defn- compile-opt
405402 [repl-env [_ ns & args] cfg]
You can’t perform that action at this time.
0 commit comments