[fix #] pass network-status to account app-db

when login offline the offline gray box was not shown in chat-list
and the fix in #2314 would not work in that case
This commit is contained in:
Eric Dvorsak 2018-01-08 16:35:41 +01:00
parent 156089b07b
commit c0ba70c28a
No known key found for this signature in database
GPG Key ID: 932AC1CE5F05DE0C
1 changed files with 4 additions and 3 deletions

View File

@ -245,13 +245,13 @@
(register-handler-db (register-handler-db
:initialize-account-db :initialize-account-db
(fn [{:keys [accounts/accounts contacts/contacts networks/networks (fn [{:keys [accounts/accounts contacts/contacts networks/networks
network view-id navigation-stack chats network network-status view-id navigation-stack chats
access-scope->commands-responses layout-height access-scope->commands-responses layout-height
status-module-initialized? status-node-started?] status-module-initialized? status-node-started?]
:or [network (get app-db :network)] :or [network (get app-db :network)]
:as db} [_ address]] :as db} [_ address]]
(let [console-contact (get contacts console-chat-id)] (let [console-contact (get contacts console-chat-id)]
(cond-> (assoc app-db (cond-> (assoc app-db
:access-scope->commands-responses access-scope->commands-responses :access-scope->commands-responses access-scope->commands-responses
:accounts/current-account-id address :accounts/current-account-id address
:layout-height layout-height :layout-height layout-height
@ -266,6 +266,7 @@
:accounts/accounts accounts :accounts/accounts accounts
:accounts/creating-account? false :accounts/creating-account? false
:networks/networks networks :networks/networks networks
:network-status network-status
:network network) :network network)
console-contact console-contact
(assoc :contacts/contacts {console-chat-id console-contact}))))) (assoc :contacts/contacts {console-chat-id console-contact})))))
@ -279,7 +280,7 @@
[:initialize-sync-listener] [:initialize-sync-listener]
[:initialize-chats] [:initialize-chats]
[:load-contacts] [:load-contacts]
[:load-contact-groups] [:load-contact-groups]
[:init-discoveries] [:init-discoveries]
[:initialize-debugging {:address address}] [:initialize-debugging {:address address}]
[:send-account-update-if-needed] [:send-account-update-if-needed]