fix #1469 chat: location is shown as plaintext
This commit is contained in:
parent
abafa3308a
commit
d9800fe9a7
|
@ -43,8 +43,10 @@
|
||||||
callback #(let [result (get-in % [:result :returned])
|
callback #(let [result (get-in % [:result :returned])
|
||||||
result' (if (:markup result)
|
result' (if (:markup result)
|
||||||
(update result :markup cu/generate-hiccup)
|
(update result :markup cu/generate-hiccup)
|
||||||
result)]
|
result)]
|
||||||
(dispatch [:set-in [:message-data data-type message-id] result'])
|
;; don't fill message data with nil results
|
||||||
|
(when result'
|
||||||
|
(dispatch [:set-in [:message-data data-type message-id] result']))
|
||||||
(when (and result (= :preview data-type))
|
(when (and result (= :preview data-type))
|
||||||
;; update message in realm with serialized preview
|
;; update message in realm with serialized preview
|
||||||
(messages/update {:message-id message-id
|
(messages/update {:message-id message-id
|
||||||
|
|
Loading…
Reference in New Issue