@@ -102,7 +102,10 @@ main = do
102102 ciphers <- traverse processCipher sync.ciphers
103103 liftEffect $ Elm.send app $ Bridge.LoadCiphers $ Bridge.Sub_LoadCiphers_List ciphers
104104 pure unit
105− Bridge.NeedsReset -> pure unit
105+ Bridge.NeedsReset -> do
106+ WebStorage.clear storage
107+ Elm.send app Bridge.Reset
108+ pure unit
106109 Bridge.SendMasterPassword masterPassword -> runElmAff app $ do
107110 flip runReaderT {app: app, storage: storage, crypto: services.crypto, cryptoFunctions: services.cryptoFunctions} $ do
108111 hash <- getOrReset storage MasterPasswordHashKey