gered/views
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

replace add-hint! with queue-hints!

Browse source
This commit is contained in:
Gered 2016-05-21 17:21:03 -04:00
parent 874cabdb2d
commit 4458ba3ea3
1 changed files with 8 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
src/views/core.clj
View file

@ -345,10 +345,14 @@
[namespace hint type]
{:namespace namespace :hint hint :type type})
(defn add-hint!
"Add a hint to the system."
[hint]
(swap! view-system update-in [:hints] (fnil conj #{}) hint))
(defn queue-hints!
"Queues up hints in the view system so that they will be picked up by the refresh
watcher and dispatched to the workers resulting in view updates being sent out
for the relevant views/subscribers."
[hints]
(swap! view-system update-in [:hints]
(fn [existing-hints]
(reduce conj (or existing-hints #{}) hints))))
(defn put-hints!
"Adds a collection of hints to the view system by using the view system