I hereby claim:
- I am markhepburn on github.
- I am markhepburn (https://keybase.io/markhepburn) on keybase.
- I have a public key ASBGBclrmAkauCNfW52UjGoxuOQGdE18s5o8_voPpGHlTwo
To claim this, I am signing this object:
*.ignore |
I hereby claim:
To claim this, I am signing this object:
(defn select-keys* [m paths] | |
(apply merge-in | |
(map #(cond | |
(nil? %) nil | |
(not (sequential? %)) {% (get m %)} | |
(= 1 (count %)) {(first %) (get m (first %))} | |
:else {(first %) (select-keys* (get m (first %)) [(rest %)])}) | |
paths))) | |
(comment |