fix MAP-VALS
This commit is contained in:
parent
81ec559e69
commit
205b6a1319
1 changed files with 1 additions and 3 deletions
|
|
@ -169,9 +169,7 @@
|
|||
MAP-VALS
|
||||
[]
|
||||
(select* [this structure next-fn]
|
||||
(doseqres NONE [v (vals structure)]
|
||||
(next-fn v)
|
||||
))
|
||||
(doall (mapcat next-fn (vals structure))))
|
||||
(transform* [this structure next-fn]
|
||||
(i/map-vals-transform structure next-fn)
|
||||
))
|
||||
|
|
|
|||
Loading…
Reference in a new issue