[Fixes: #17027] Fix spacing between own messages
This commit is contained in:
parent
bdedccdda6
commit
79daa4d529
|
@ -13,3 +13,14 @@
|
||||||
|
|
||||||
(and (not in-pinned-view?) (or mentioned pinned-by last-in-group?))
|
(and (not in-pinned-view?) (or mentioned pinned-by last-in-group?))
|
||||||
(assoc :margin-top 8))))
|
(assoc :margin-top 8))))
|
||||||
|
|
||||||
|
(defn user-message-content
|
||||||
|
[{:keys [first-in-group? outgoing outgoing-status]}]
|
||||||
|
{:border-radius 16
|
||||||
|
:padding-horizontal 8
|
||||||
|
:padding-vertical (if first-in-group?
|
||||||
|
8
|
||||||
|
4)
|
||||||
|
:opacity (if (and outgoing (= outgoing-status :sending))
|
||||||
|
0.5
|
||||||
|
1)})
|
||||||
|
|
|
@ -134,9 +134,10 @@
|
||||||
:message-sending
|
:message-sending
|
||||||
:message-sent)
|
:message-sent)
|
||||||
:underlay-color (colors/theme-colors colors/neutral-5 colors/neutral-90)
|
:underlay-color (colors/theme-colors colors/neutral-5 colors/neutral-90)
|
||||||
:style {:border-radius 16
|
:style (style/user-message-content
|
||||||
:padding 8
|
{:first-in-group? (:first-in-group? message-data)
|
||||||
:opacity (if (and outgoing (= outgoing-status :sending)) 0.5 1)}
|
:outgoing outgoing
|
||||||
|
:outgoing-status outgoing-status})
|
||||||
:on-press (fn []
|
:on-press (fn []
|
||||||
(if (and platform/ios? keyboard-shown?)
|
(if (and platform/ios? keyboard-shown?)
|
||||||
(rn/dismiss-keyboard!)
|
(rn/dismiss-keyboard!)
|
||||||
|
|
Loading…
Reference in New Issue