Merge remote-tracking branch 'solackerman/master'

This commit is contained in:
Nathan Marz 2015-02-27 15:20:15 -05:00
commit 7880e5c7f8

View file

@ -143,14 +143,7 @@
(into [] (r/mapcat (partial next-fn vals) structure)))
(update* [this vals structure next-fn]
(let [ret (r/map (partial next-fn vals) structure)]
(cond (vector? structure)
(into [] ret)
(map? structure)
(into {} ret)
:else
(into '() ret)))
(into (empty structure) ret))
))
(deftype ValStructurePath []