[fix 7380] bubble width on small devices

This commit is contained in:
yenda 2019-02-01 01:58:38 +01:00
parent b3416f5ad5
commit c58342d397
No known key found for this signature in database
GPG Key ID: 0095623C0069DCE6
1 changed files with 12 additions and 9 deletions

View File

@ -29,13 +29,11 @@
(let [align (if outgoing :flex-end :flex-start)
direction (if outgoing :row-reverse :row)]
(merge {:flex-direction direction
:width 230
:padding-top (message-padding-top message)
:align-self align
:align-items align}
(when display-photo?
{:padding-right 8
:padding-left 8}))))
{:padding-left 8}))))
(def message-timestamp
{:font-size 10
@ -66,8 +64,11 @@
:font-size 12
:color colors/text-gray})
(defn group-message-wrapper [message]
(defn group-message-wrapper [{:keys [outgoing] :as message}]
(merge {:flex-direction :column}
(if outgoing
{:margin-left 64}
{:margin-right 64})
(last-message-padding message)))
(defn timestamp-content-wrapper [{:keys [outgoing]}]
@ -76,11 +77,13 @@
(defn group-message-view
[outgoing message-type]
(let [align (if outgoing :flex-end :flex-start)]
{:flex-direction :column
:width 320
:padding-left 8
:padding-right 8
:align-items align}))
(merge {:flex 1
:flex-direction :column
:max-width 320
:align-items align}
(if outgoing
{:margin-right 8}
{:margin-left 8}))))
(defn delivery-status [outgoing]
(if outgoing