3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-06-05 09:21:39 +02:00
Code Issues Projects Releases Packages Wiki Activity

🎉 Add transducer version of mapm data helper.

Browse source
This commit is contained in:
Andrey Antukh 2021-03-15 08:38:32 +01:00
parent f7d0383919
commit 2de1c92ee8
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
common/app/common/data.cljc
View file

@ -146,8 +146,10 @@
(defn mapm (defn mapm
"Map over the values of a map" "Map over the values of a map"
[mfn coll] ([mfn]
(into {} (map (fn [[key val]] [key (mfn key val)]) coll))) (map (fn [[key val]] [key (mfn key val)])))
([mfn coll]
(into {} (mapm mfn) coll)))
(defn filterm (defn filterm
"Filter values of a map that satisfy a predicate" "Filter values of a map that satisfy a predicate"