fix #475
This commit is contained in:
parent
353d50d6bf
commit
f977dd6d0c
|
@ -65,7 +65,7 @@
|
|||
pred (subscribe [:get :contacts-filter])]
|
||||
(reaction
|
||||
(let [ordered (sort-contacts @contacts)
|
||||
ordered (if pred (filter @pred ordered) ordered)]
|
||||
ordered (if @pred (filter @pred ordered) ordered)]
|
||||
(reduce (fn [prev cur]
|
||||
(let [prev-letter (get-contact-letter (last prev))
|
||||
cur-letter (get-contact-letter cur)]
|
||||
|
|
Loading…
Reference in New Issue