File tree Expand file tree Collapse file tree 1 file changed +4
-3
lines changed Expand file tree Collapse file tree 1 file changed +4
-3
lines changed Original file line number Diff line number Diff line change 2985
2985
(repeat warnings))
2986
2986
warnings)))
2987
2987
ana/*verbose* (:verbose opts)]
2988
- (when ana/*verbose*
2988
+ (when ( and ana/*verbose* ( not ( ::watch-triggered-build? opts)))
2989
2989
(util/debug-prn " Options passed to ClojureScript compiler:" (pr-str opts)))
2990
2990
(let [one-file? (and (:main opts)
2991
2991
(#{:advanced :simple :whitespace } (:optimizations opts)))
3128
3128
srvc (.newWatchService fs)]
3129
3129
(letfn [(buildf []
3130
3130
(try
3131
- (let [start (System/nanoTime )]
3132
- (build source opts compiler-env)
3131
+ (let [start (System/nanoTime )
3132
+ watch-opts (assoc opts ::watch-triggered-build? true )]
3133
+ (build source watch-opts compiler-env)
3133
3134
(println " ... done. Elapsed"
3134
3135
(/ (unchecked-subtract (System/nanoTime ) start) 1e9 ) " seconds" )
3135
3136
(flush ))
You can’t perform that action at this time.
0 commit comments