[fix 7380] bubble width on small devices
This commit is contained in:
parent
b3416f5ad5
commit
c58342d397
|
@ -29,13 +29,11 @@
|
||||||
(let [align (if outgoing :flex-end :flex-start)
|
(let [align (if outgoing :flex-end :flex-start)
|
||||||
direction (if outgoing :row-reverse :row)]
|
direction (if outgoing :row-reverse :row)]
|
||||||
(merge {:flex-direction direction
|
(merge {:flex-direction direction
|
||||||
:width 230
|
|
||||||
:padding-top (message-padding-top message)
|
:padding-top (message-padding-top message)
|
||||||
:align-self align
|
:align-self align
|
||||||
:align-items align}
|
:align-items align}
|
||||||
(when display-photo?
|
(when display-photo?
|
||||||
{:padding-right 8
|
{:padding-left 8}))))
|
||||||
:padding-left 8}))))
|
|
||||||
|
|
||||||
(def message-timestamp
|
(def message-timestamp
|
||||||
{:font-size 10
|
{:font-size 10
|
||||||
|
@ -66,8 +64,11 @@
|
||||||
:font-size 12
|
:font-size 12
|
||||||
:color colors/text-gray})
|
:color colors/text-gray})
|
||||||
|
|
||||||
(defn group-message-wrapper [message]
|
(defn group-message-wrapper [{:keys [outgoing] :as message}]
|
||||||
(merge {:flex-direction :column}
|
(merge {:flex-direction :column}
|
||||||
|
(if outgoing
|
||||||
|
{:margin-left 64}
|
||||||
|
{:margin-right 64})
|
||||||
(last-message-padding message)))
|
(last-message-padding message)))
|
||||||
|
|
||||||
(defn timestamp-content-wrapper [{:keys [outgoing]}]
|
(defn timestamp-content-wrapper [{:keys [outgoing]}]
|
||||||
|
@ -76,11 +77,13 @@
|
||||||
(defn group-message-view
|
(defn group-message-view
|
||||||
[outgoing message-type]
|
[outgoing message-type]
|
||||||
(let [align (if outgoing :flex-end :flex-start)]
|
(let [align (if outgoing :flex-end :flex-start)]
|
||||||
{:flex-direction :column
|
(merge {:flex 1
|
||||||
:width 320
|
:flex-direction :column
|
||||||
:padding-left 8
|
:max-width 320
|
||||||
:padding-right 8
|
:align-items align}
|
||||||
:align-items align}))
|
(if outgoing
|
||||||
|
{:margin-right 8}
|
||||||
|
{:margin-left 8}))))
|
||||||
|
|
||||||
(defn delivery-status [outgoing]
|
(defn delivery-status [outgoing]
|
||||||
(if outgoing
|
(if outgoing
|
||||||
|
|
Loading…
Reference in New Issue