status-im
/
re-frame
mirror of https://github.com/status-im/re-frame.git
2
0
Fork 0
Code Issues Projects Releases Wiki Activity

Rename label to marker in subs

This commit is contained in:
Daniel Compton 2017-05-01 08:44:12 +12:00
parent 0757310565
commit 25d7677fad
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
src/re_frame/subs.cljc
View File

@ -183,18 +183,18 @@
f)
;; one sugar pair
2 (let [[label vec] input-args]
(when-not (= :<- label)
(console :error err-header "expected :<-, got:" label))
2 (let [[marker vec] input-args]
(when-not (= :<- marker)
(console :error err-header "expected :<-, got:" marker))
(fn inp-fn
([_] (subscribe vec))
([_ _] (subscribe vec))))
;; multiple sugar pairs
(let [pairs (partition 2 input-args)
labels (map first pairs)
vecs (map last pairs)]
(when-not (and (every? #{:<-} labels) (every? vector? vecs))
(let [pairs (partition 2 input-args)
markers (map first pairs)
vecs (map last pairs)]
(when-not (and (every? #{:<-} markers) (every? vector? vecs))
(console :error err-header "expected pairs of :<- and vectors, got:" pairs))
(fn inp-fn
([_] (map subscribe vecs))