     (->> (for [e entities]
            (case (:id e)
              :text (do
-                     (->> [(some-> @u/error .toString)
-                           (when (and @u/error @u/stack-trace?)
-                             (for [elem (.getStackTrace @u/error)]
-                               (.toString elem)))]
-                          flatten
-                          (remove nil?)
-                          (string/join \newline)
-                          (label! (scroll-pane! e :get-widget) :set-text))
+                     (label! (scroll-pane! e :get-widget) :set-text (error-str))
                      (assoc e :width (if (.isVisible (u/glass))
                                        (- (game :width) u/editor-width)
                                        (game :width))))

      "restart" (restart!)
      "files" (u/toggle-glass!)
      "stack-trace" (swap! u/stack-trace? not)
      "copy" nil
      nil)
    nil))


            [nightmod.utils :as u]
            [play-clj.core :refer :all]
            [play-clj.ui :refer :all]
            [seesaw.core :as s])
  (:import [java.awt Toolkit]
           [java.awt.datatransfer Clipboard ClipboardOwner StringSelection]))

(declare nightmod main-screen blank-screen overlay-screen)

