status-im
/
status-mobile
mirror of https://github.com/status-im/status-mobile.git
2
0
Fork 0
Code Issues Projects Releases Wiki Activity

Fix group commands

This commit is contained in:
janherich 2018-01-08 15:01:44 +01:00
parent c99af08c4f
commit d98f3846fd
No known key found for this signature in database
GPG Key ID: C23B473AFBE94D13
1 changed files with 23 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

43
src/status_im/chat/events/input.cljs
View File

@ -245,7 +245,7 @@
metadata
args]
:as content} :content
:keys [chat-id jail-id data-type event-after-creator message-id current-time]}]
:keys [chat-id group-id jail-id data-type event-after-creator message-id current-time]}]
(let [{:keys [dapp? dapp-url name]} (get contacts chat-id)
metadata (merge metadata
(when dapp?
@ -267,6 +267,7 @@
request-data {:message-id message-id
:chat-id chat-id
:group-id group-id
:jail-id (or owner-id jail-id)
:content {:command (:name command)
:scope-bitmask (:scope-bitmask command)
@ -290,25 +291,27 @@
If it's normal command instead (determined by nil response to `:on-send` jail request),
processing continues by requesting command preview before actually sending the command
message."
[{:keys [current-chat-id] :as db} {{:keys [bot]} :command :as content} message-id current-time]
(let [params-template {:content content
:chat-id current-chat-id
:jail-id (or bot current-chat-id)
:message-id message-id
:current-time current-time}
on-send-params (merge params-template
{:data-type :on-send
:event-after-creator (fn [_ jail-response]
[::check-command-type
jail-response
params-template])})
after-validation-events [[::request-command-data on-send-params]]
validation-params (merge params-template
{:data-type :validator
:event-after-creator (fn [_ jail-response]
[::proceed-validation
jail-response
after-validation-events])})]
[{:keys [current-chat-id chats] :as db} {{:keys [bot]} :command :as content} message-id current-time]
(let [params-template {:content content
:chat-id current-chat-id
:group-id (when (get-in chats [current-chat-id :group-chat])
current-chat-id)
:jail-id (or bot current-chat-id)
:message-id message-id
:current-time current-time}
on-send-params (merge params-template
{:data-type :on-send
:event-after-creator (fn [_ jail-response]
[::check-command-type
jail-response
params-template])})
after-validation-events [[::request-command-data on-send-params]]
validation-params (merge params-template
{:data-type :validator
:event-after-creator (fn [_ jail-response]
[::proceed-validation
jail-response
after-validation-events])})]
(request-command-data db validation-params)))
;;;; Handlers