diff --git a/src/App/Container.purs b/src/App/Container.purs index 93c36ba..39feba9 100644 --- a/src/App/Container.purs +++ b/src/App/Container.purs @@ -622,6 +622,10 @@ handleAction = case _ of Home, m@(DNSManager.MkLogged _) -> do update_domain_list state m revert_old_page + Authentication, m@(DNSManager.MkLogged _) -> do + update_domain_list state m + -- handleAction $ Log $ SystemLog "go to domain list!" + handleAction $ Routing DomainList -- Logged = page just reloaded, but page already changed, no need to do that again. _, m@(DNSManager.MkLogged _) -> do -- handleAction $ Log $ SystemLog "logged to dnsmanagerd, do not change page"