Hi,
user=> (let [vmap '{y :y z :z :keys [a b] :syms [e f] :strs [g h]}]
(-> (dissoc vmap :keys :strs :syms)
(into (map #(vector % (keyword %)) (:keys vmap)))
(into (map #(vector % (name %)) (:strs vmap)))
(into (map #(vector % %) (:syms vmap)))))
{y :y, z :z, a :a, b :b, g "g", h "h", e e, f f}
This is also takes care of correct :strs and :syms handling.
Sincerely
Meikel
--
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
