send group name in test app
This commit is contained in:
parent
dd9e1d98f4
commit
9874a3aee2
|
@ -150,7 +150,7 @@
|
|||
(defn start-group-chat []
|
||||
(let [identities (get-group-identities)]
|
||||
(add-to-chat "group-chat" ":" (str "Starting group chat with " identities))
|
||||
(let [group-id (p/start-group-chat identities)]
|
||||
(let [group-id (p/start-group-chat identities "zgroup!")]
|
||||
(set-group-id! group-id))))
|
||||
|
||||
(defn add-new-peer-to-group []
|
||||
|
|
Loading…
Reference in New Issue