fix: linting and variable name

This commit is contained in:
Jonathan Rainville 2020-04-16 09:40:15 -04:00 committed by Andrea Maria Piana
parent b2cdc59670
commit 7e069ed342
No known key found for this signature in database
GPG Key ID: AA6CCA6DE0E06424
1 changed files with 8 additions and 8 deletions

View File

@ -529,13 +529,13 @@
;; instead of using pos?
(not (zero? (:peers-count db))))
(if-let [preferred-mailserver (preferred-mailserver-id db)]
(let [error-dismissed (connection-error-dismissed db)
(let [error-dismissed? (connection-error-dismissed db)
current-fleet (node/current-fleet-key db)]
;; Error connecting to the mail server
{:db
(update-mailserver-state db :error)
:ui/show-confirmation
(when-not error-dismissed
(when-not error-dismissed?
{:title (i18n/label :t/mailserver-error-title)
:content (i18n/label :t/mailserver-error-content)
:confirm-button-text (i18n/label :t/mailserver-pick-another)
@ -1179,12 +1179,12 @@
mailserver-id (:mailserver/current-id db)
pinned-mailservers (get-in db [:multiaccount :pinned-mailservers])]
(fx/merge cofx
(multiaccounts.update/multiaccount-update
:pinned-mailservers (assoc pinned-mailservers
current-fleet
mailserver-id)
{})
(dismiss-connection-error false))))
(multiaccounts.update/multiaccount-update
:pinned-mailservers (assoc pinned-mailservers
current-fleet
mailserver-id)
{})
(dismiss-connection-error false))))
(fx/defn load-gaps-fx [{:keys [db] :as cofx} chat-id]
(when-not (get-in db [:gaps-loaded? chat-id])