             (.append line)
             (.append ":")
             (.append column)
-            (.append "]"))
-
-          (when mapping
-            (.append sb ")"))
-
-          (doto sb
-            (.append "\n\t")
-            (.append (.-description err)))
+            (.append "]\n"))
 
           (-> {:line line
                :column column

  (when-some [data (read-variable-map state "closure.variable.map")]
    (.setInputVariableMap co data)))

(defn js-error-xf [state ^com.google.javascript.jscomp.Compiler cc]
  (comp
    ;; remove some annoying UNDECLARED_VARIABLES in cljs/core.cljs
    ;; these are only used in self-hosted but I don't want to provide externs for them in browser builds

              (.getCharno err)

              mapping
              (.getSourceMapping cc source-name line column)

              src
              (when mapping
                (let [src-name (.getOriginalFile mapping)]
                  (get-in state [:sources src-name])))]

          (doto sb
            (.append (.-description err))
            (.append "\n"))

          (.append sb "Original: ")

          (when mapping
            (let [{:keys [file url]} src

                  src-loc
                  (or (when file (.getAbsolutePath file))
                      (let [x (str url)]
                        (if-let [idx (str/index-of x ".m2")]
                          (str "~/" (subs x idx))
                          x))
                      (.getOriginalFile mapping))]

              (doto sb
                (.append src-loc)
                (.append " [")
                (.append (.getLineNumber mapping))
                (.append ":")
                (.append (.getColumnPosition mapping))
                (.append "]\n")
                (.append "Compiled to: "))))

          (doto sb
            (.append source-name)
