   [:div.card-output
    [:div.card-data
     (into [:pre.line]
-          (for [line output]
+          (for [line (str/split output #"\n")]
             [:code.line line]))]
    [:hr.border]])
 


(defn on-repl-print [state num [s]]
  (when num
    (swap! state update-in [:history num] update :output conj s)))

(defn on-repl-error [state num [err]]
  (when num

   [cljs.core.async.macros :refer [go go-loop]]))

(def default-state
  {:repl    nil
   :ns      nil
   :input   ""
   :cursor  0
   :history (sorted-map)})
