From 523df99f5cc18f70a2bb06f0c485be7389389064 Mon Sep 17 00:00:00 2001
From: Philippe Pittoli <karchnu@karchnu.fr>
Date: Wed, 21 Feb 2024 05:33:55 +0100
Subject: [PATCH] Fix typo, minor bugfix.

---
 src/App/ZoneInterface.purs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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?"