|
123 | 123 | (fn [{:keys [message-data context keyboard-shown? show-reactions? in-reaction-and-action-menu?
|
124 | 124 | show-user-info? preview? theme]}]
|
125 | 125 | (let [{:keys [content-type quoted-message content outgoing outgoing-status pinned-by last-in-group?
|
126 |
| - pinned in-pinned-view? message-id chat-id]} message-data |
127 |
| - first-image (first (:album message-data)) |
128 |
| - outgoing-status (if (= content-type |
129 |
| - constants/content-type-album) |
130 |
| - (:outgoing-status first-image) |
131 |
| - outgoing-status) |
132 |
| - outgoing (if (= content-type |
133 |
| - constants/content-type-album) |
134 |
| - (:outgoing first-image) |
135 |
| - outgoing) |
136 |
| - context (assoc context |
137 |
| - :on-long-press |
138 |
| - #(on-long-press message-data |
139 |
| - context |
140 |
| - keyboard-shown?)) |
141 |
| - response-to (:response-to content) |
142 |
| - height (rf/sub [:dimensions/window-height]) |
| 126 | + pinned message-id chat-id]} message-data |
| 127 | + first-image (first (:album message-data)) |
| 128 | + outgoing-status (if (= content-type |
| 129 | + constants/content-type-album) |
| 130 | + (:outgoing-status first-image) |
| 131 | + outgoing-status) |
| 132 | + outgoing (if (= content-type |
| 133 | + constants/content-type-album) |
| 134 | + (:outgoing first-image) |
| 135 | + outgoing) |
| 136 | + context (assoc context |
| 137 | + :on-long-press |
| 138 | + #(on-long-press message-data |
| 139 | + context |
| 140 | + keyboard-shown?)) |
| 141 | + response-to (:response-to content) |
| 142 | + height (rf/sub [:dimensions/window-height]) |
143 | 143 | {window-width :width
|
144 |
| - window-scale :scale} (rn/get-window) |
145 |
| - message-container-data {:window-width window-width |
146 |
| - :padding-right 20 |
147 |
| - :padding-left 20 |
148 |
| - :avatar-container-width 32 |
149 |
| - :message-margin-left 8} |
150 |
| - reactions (rf/sub [:chats/message-reactions |
151 |
| - message-id |
152 |
| - chat-id]) |
153 |
| - six-reactions? (-> reactions |
154 |
| - count |
155 |
| - (= 6))] |
| 144 | + window-scale :scale} (rn/get-window) |
| 145 | + message-container-data {:window-width window-width |
| 146 | + :padding-right 20 |
| 147 | + :padding-left 20 |
| 148 | + :avatar-container-width 32 |
| 149 | + :message-margin-left 8} |
| 150 | + reactions (rf/sub [:chats/message-reactions |
| 151 | + message-id |
| 152 | + chat-id]) |
| 153 | + six-reactions? (-> reactions |
| 154 | + count |
| 155 | + (= 6))] |
156 | 156 | [rn/touchable-highlight
|
157 | 157 | {:accessibility-label (if (and outgoing (= outgoing-status :sending))
|
158 | 158 | :message-sending
|
|
0 commit comments