                      :on-change
                      (fn keyword-changed [e]
                        (emit-fn :changed path (keyword (.. e -target -value))))}]
-            [:span {:style (:keywords styles)} (str data)])
+            [KeywordText data])
 
           (object? data)
           (str data " " (.stringify js/JSON data))

      [:span "{"]
      (if expanded?
        (map-indexed (fn [i x] ^{:key i} [KeyValNode (assoc all :data x)]) data)
        [:span {:style (:keywords styles)} (clojure.string/join " " (->> (keys data) (map pr-str)))])
      [:span "}"]]]))

(defn DataFrisk [{:keys [data] :as all}]

                     :on-change
                     (fn string-changed [e]
                       (emit-fn :changed path (.. e -target -value)))}]
            [StringText data])

          (keyword? data)
          (if swappable
