Skip to content

Instantly share code, notes, and snippets.

@amalloy

amalloy/update.clj

Created April 8, 2011 17:38
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save amalloy/910333 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save amalloy/910333 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
update.clj
(defn update
[m [& keys] f & args]
(reduce (fn [m k]
(update-in m [k] #(apply f % args)))
m keys))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment