Fix group members count

This commit is contained in:
virvar 2016-05-20 14:38:20 +03:00
parent ff5898b0a1
commit df2d2b02ca
2 changed files with 4 additions and 3 deletions

View File

@ -48,6 +48,7 @@
(defn typing-all []
[view st/typing-all
;; TODO stub data
(for [member ["Geoff" "Justas"]]
^{:key member} [typing member])])
@ -167,7 +168,7 @@
[view {:flexDirection :row}
[icon :group st/group-icon]
[text {:style st/members}
(let [cnt (count @contacts)]
(let [cnt (inc (count @contacts))]
(str cnt
(if (< 1 cnt)
" members"

View File

@ -19,8 +19,8 @@
[icon :group st/group-icon])
(when group-chat
[text {:style st/memebers-text}
(if (< 1 (count contacts))
(str (count contacts) " members")
(if (< 0 (count contacts))
(str (inc (count contacts)) " members")
"1 member")])]
[text {:style st/last-message-text
:numberOfLines 2}