sample

(defn transform-fields [m]
  (into [] (flatten (for [[k v] m] [k {:type (keyword v)}]))))

(defn parse-json-config [s] 
  (let [jsn (keywordize-keys (json/parse-string s))
        result (into {} (for [[idx cfg-map] jsn]
                          {idx (into {} (for [[k v] cfg-map] 
                                          (if (or (= :fields k) (= :attributes k))
                                          {k (transform-fields v)}
                                          {k v})))}))]
    (trace (str "config loaded and parsed from json: " result))
    result))