From 7c5574e3d453eaeaa8b81d6439564a7b997bd527 Mon Sep 17 00:00:00 2001
From: Philippe Pittoli <karchnu@karchnu.fr>
Date: Wed, 12 Jul 2023 19:15:08 +0200
Subject: [PATCH] Remove Finalize action.

---
 src/App/ZoneInterface.purs | 5 -----
 1 file changed, 5 deletions(-)

diff --git a/src/App/ZoneInterface.purs b/src/App/ZoneInterface.purs
index f5250e7..d1b334f 100644
--- a/src/App/ZoneInterface.purs
+++ b/src/App/ZoneInterface.purs
@@ -118,7 +118,6 @@ data Action
   | CancelModal
 
   | Initialize
-  | Finalize
 
   -- Add new entries.
   | AddRR Add_RR
@@ -162,7 +161,6 @@ component =
         { initialize   = Just Initialize
         , handleAction = handleAction
         , handleQuery  = handleQuery
-        , finalize     = Just Finalize
         }
     }
 
@@ -251,9 +249,6 @@ handleAction = case _ of
     message <- H.liftEffect $ DNSManager.serialize $ DNSManager.MkGetZone { domain: _current_domain }
     H.raise $ MessageToSend message
 
-  Finalize -> do
-    H.raise $ Log $ SimpleLog "Finalized!"
-
   UpdateNewForm form -> case form of
     Update_New_Form_SRR rr_update -> case rr_update of
       Update_SRR_Type val -> do