Hide status message

This commit is contained in:
virvar 2016-04-23 23:59:48 +03:00
parent 0bd8ff367f
commit cd3c6e93c9
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)