diff --git a/src/App/ZoneInterface.purs b/src/App/ZoneInterface.purs index 9a4b9e7..5925b84 100644 --- a/src/App/ZoneInterface.purs +++ b/src/App/ZoneInterface.purs @@ -542,7 +542,7 @@ handleAction = case _ of -- | Initialize the ZoneInterface component: ask for the domain zone to `dnsmanagerd`. Initialize -> do { _domain } <- H.get - H.raise $ Log $ SystemLog $ "Asking the server for the zone" <> _domain + H.raise $ Log $ SystemLog $ "Asking the domain " <> _domain message <- H.liftEffect $ DNSManager.serialize $ DNSManager.MkGetZone { domain: _domain } H.raise $ MessageToSend message @@ -709,7 +709,7 @@ render_resources records else Bulma.p "no basic records" basic_readonly_records_section - = if A.length all_basic_rr > 0 + = if A.length all_basic_ro_rr > 0 then Bulma.table [] [ Bulma.simple_table_header_ro, render_basic_records all_basic_ro_rr] else Bulma.p "no read only records?"