luciano/specter
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

eagerly evaluate ALL

Browse source
This commit is contained in:
Nathan Marz 2015-03-01 23:34:20 -05:00
parent 857cd04711
commit a6b8546a17
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/clj/com/rpl/specter/impl.clj
View file

@ -145,7 +145,7 @@
(let [empty-structure (empty structure) (let [empty-structure (empty structure)
pfn (partial next-fn vals)] pfn (partial next-fn vals)]
(if (list? empty-structure) (if (list? empty-structure)
(map pfn structure) (doall (map pfn structure))
(->> structure (r/map pfn) (into empty-structure)) (->> structure (r/map pfn) (into empty-structure))
)))) ))))