Clojure - map fn to map

This fn/macro will map a function to each value in a map, returning a map containing the corresponding keys to the new values.

; As a function, thanks to signalpillar's comment below
(defn map-fn-to-map [f m]
  "Maps f to each value of m, returning the corresponding map."
  (into {} (for [[k v] m] [k (f v)])))

; As a macro
(defmacro map-fn-to-map [f m]
  "Maps f to each value of m, returning the corresponding map."
  `(into {} (for [[k# v#] ~m] [k# (~f v#)])))