Return status view

Former-commit-id: b4c9c72481
This commit is contained in:
virvar 2016-04-25 12:05:54 +03:00
parent 989d4610f2
commit cc8d92193a
1 changed files with 13 additions and 13 deletions

View File

@ -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 businessmans braggadocio " :content (str "The brash businessmans 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)