map-flatten

map-flatten.clj

(defn map-flatten
  ([params]
   (into {} (map-flatten params nil)))
  ([params prefix]
   (mapcat (fn [[k v]]
             (let [prefix (if (nil? prefix) (name k) (str prefix "[" (name k) "]"))]
               (if (map? v)
                 (map-flatten v prefix)
                 [{prefix v}])))
           params)))