                          :process
                          :exit-code)))
             (is (empty? @email))
-            (is (not (empty? (slack-msg))))))))))
+            (is (= (:color (slack-msg)) "good"))))))))
 
 (s/deftest execution-with-slack-overrides
   (testing "slack overrides:"

      json/decode
      keywordize-keys
      :attachments
      first
      :title))

(defn fake-slack-send [opts ctx]
  (reset! slack (slack/render opts ctx)))

                             :exit-code)))
                (is (.startsWith
                     (let [[_ _ _ _ subj _ _] @email] subj) "FAILURE"))
                (is (.contains (:title (slack-msg)) "FAILURE")))
              (testing "Running again w/o wipe-workspace should update the repo"
                (let [[opts2 res2] (run
                                     (conj
