parent
989d4610f2
commit
cc8d92193a
|
@ -148,19 +148,19 @@
|
||||||
(let [msgs @messages
|
(let [msgs @messages
|
||||||
;_ (log/debug "messages=" msgs)
|
;_ (log/debug "messages=" msgs)
|
||||||
;; temp to show first status
|
;; temp to show first status
|
||||||
;; msgs-clj (assoc (js->clj msgs) "-1"
|
msgs-clj (assoc (js->clj msgs) "-1"
|
||||||
;; {:msg-id "-1"
|
{:msg-id "-1"
|
||||||
;; :content (str "The brash businessman’s braggadocio "
|
:content (str "The brash businessman’s braggadocio "
|
||||||
;; "and public exchange with candidates "
|
"and public exchange with candidates "
|
||||||
;; "in the US presidential election")
|
"in the US presidential election")
|
||||||
;; :delivery-status "seen"
|
:delivery-status "seen"
|
||||||
;; :from "Status"
|
:from "Status"
|
||||||
;; :chat-id "-"
|
:chat-id "-"
|
||||||
;; :content-type content-type-status
|
:content-type content-type-status
|
||||||
;; :timestamp 1
|
:timestamp 1
|
||||||
;; :outgoing false
|
:outgoing false
|
||||||
;; :to nil})
|
:to nil})
|
||||||
;; msgs (clj->js msgs-clj)
|
msgs (clj->js msgs-clj)
|
||||||
;; end temp
|
;; end temp
|
||||||
datasource (to-realm-datasource msgs)
|
datasource (to-realm-datasource msgs)
|
||||||
contacts (:contacts @chat)
|
contacts (:contacts @chat)
|
||||||
|
|
Loading…
Reference in New Issue