Tell the navbar when a disconnection happens.

2024-03-23 17:09:22 +01:00 · 2024-03-23 17:09:22 +01:00 · a61e723811
commit a61e723811
parent 177e3f307f
1 changed files with 2 additions and 0 deletions
--- a/src/App/Container.purs
+++ b/src/App/Container.purs
@ -588,6 +588,8 @@ handleAction = case _ of
  Disconnection -> do
    H.put $ initialState unit

+    handleAction $ ToggleAuthenticated Nothing
+
    -- Remove all stored session data.
    sessionstorage <- H.liftEffect $ Window.sessionStorage =<< HTML.window
    H.liftEffect $ Storage.clear sessionstorage