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

View File

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