Treebrary.org/rss-thread-watcher
1
0
Fork 0
Code Issues 19 Pull requests Projects 2 Releases 2 Packages Wiki Activity

Add [fmap] for mapping over map

Browse source
This commit is contained in:
Felisp 2024-01-08 03:23:03 +01:00
parent 8a627ce256
commit 618304f5eb
1 changed files with 8 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
src/rss_thread_watch/utils.clj
View file

@ -68,3 +68,11 @@
(map? default-val)) ; If only one is, we don't care cus then it's just assigment (map? default-val)) ; If only one is, we don't care cus then it's just assigment
{k (map-apply-defaults conf-val default-val)} {k (map-apply-defaults conf-val default-val)}
{k (nil?-else conf-val default-val)}))))) {k (nil?-else conf-val default-val)})))))
(defn fmap [f m]
"Applies function [f] to every key and value in map [m]
Function signature should be (f [key value])."
(into
(empty m)
(for [[key val] m]
[key (f key val)])))