       (if (= 1 (count messages))
         (str "  "
              (color-text (-> messages first :message)
-                         :bold))
+                         (if (= environment :repl)
+                           :yellow
+                           :bold)))
         (string/join "\n"
                      (map
                       (fn [{:keys [class message]}]

(ns figwheel-sidecar.cljs-utils.exception-parsing
  (:require
   [clojure.string :as string]
   [clojure.java.io :as io]
   [clojure.stacktrace :as stack]

      res)))

(defn fetch-code-lines [{:keys [file root-source-info source-form environment current-ns] :as ex}]
  (let [source-data (meta (or source-form (-> root-source-info :source-form)))]
    (cond
      (and source-data (not (string/blank? (:source source-data))))
      (string/split (extract-and-format-source
