                   :reaction (fn [this data]
                               ;(object/update! this [:buffer] str data)
                               (when-not (:connected @this)
-                                (notifos/done-working "")
-                                (notifos/done-working "")
+                                (notifos/done-working)
+                                (notifos/done-working)
                                 (popup/popup! {:header "We couldn't connect."
                                                :body [:span "Looks like there was an issue trying to connect
                                                       to the project. Here's what we got:" [:pre (:buffer @this)]]

(object/behavior* ::handle-cancellation
                  :triggers #{:editor.eval.clj.cancel}
                  :reaction (fn [this]
                              (notifos/done-working "")
                              (notifos/set-msg! "Canceled clj eval." {:class "error"})))

(object/behavior* ::print-length

                                (object/update! this [:buffer] str out)
                                (if (> (.indexOf out "nREPL server started") -1)
                                  (do
                                    (notifos/done-working)
                                    (object/merge! this {:connected true})
                                    (let [client (clients/by-id (:cid @this))]
                                      (object/merge! client {:port (-> (re-seq #"port ([\d]+)" out) first second)})
