[FIX #1474] Fix copy/paste of coordinates, address, and map viewing
This commit is contained in:
parent
6fa9040def
commit
0df8dcad32
|
@ -412,9 +412,9 @@
|
|||
:on-long-press #(cond (= content-type text-content-type)
|
||||
(share content (label :t/message))
|
||||
(and (= content-type content-type-command) (= "location" (:content-command content)))
|
||||
(let [params (str/split (get-in content [:params "address"]) #"&")
|
||||
latlong (rest params)]
|
||||
(share-or-open-map (first params) (first latlong) (second latlong))))}
|
||||
(let [address (get-in content [:params :address])
|
||||
[location lat long] (str/split address #"&")]
|
||||
(share-or-open-map location lat long)))}
|
||||
[view
|
||||
(let [incoming-group (and group-chat (not outgoing))]
|
||||
[message-content message-body (merge message
|
||||
|
|
Loading…
Reference in New Issue