From b8b766007c9f02b3741ae2387cc1070bd79feb40 Mon Sep 17 00:00:00 2001
From: Philippe Pittoli <karchnu@karchnu.fr>
Date: Tue, 27 Feb 2024 19:31:47 +0100
Subject: [PATCH] Remove useless message in the logs.

---
 src/App/Container.purs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/App/Container.purs b/src/App/Container.purs
index db1a4d9..f84d7f6 100644
--- a/src/App/Container.purs
+++ b/src/App/Container.purs
@@ -638,8 +638,7 @@ handleAction = case _ of
             handleAction $ Log $ SuccessLog $ "Resource Record added: " <> response.rr.rrtype
             handleAction $ DispatchDNSMessage m
           m@(DNSManager.MkGeneratedZoneFile response) -> do
-            handleAction $ Log $ SuccessLog $ "Received the generated zonefile for " <> response.domain
-            handleAction $ Log $ SuccessLog $ "TODO: show it, " <> response.zonefile
+            handleAction $ Log $ SuccessLog $ "Received zonefile for " <> response.domain
             handleAction $ DispatchDNSMessage m
           (DNSManager.MkInvalidDomainName _) -> do
             handleAction $ Log $ ErrorLog $ "The domain is not valid!"