 
         (let [build-state
               (-> (util/new-build build-config mode {})
-                  (build-api/with-logger
-                    (util/async-logger log-chan))
+                  (build-api/with-logger build-logger)
                   (build/configure mode build-config {})
                   (build/compile)
                   (cond->

                 :mode mode
                 :log []})

          log-chan
          (async/chan 10)

          pub-msg
          (fn [msg]
            (>!! log-chan msg)
            ;; FIXME: this is not worker output but adding an extra channel seems like overkill
            (sys-bus/publish! system-bus ::m/worker-broadcast msg)
            (sys-bus/publish! system-bus [::m/worker-output build-id] msg))]

                    :report (binding [warnings/*color* false]
                              (errors/error-format e))
                    }))
        ))))

(add-mutation 'shadow.cljs.ui.transactions/build-compile
  {::pc/input #{:build-id}
