From 0b70bbb8dedd948b1c526aa3dbfa90d2cd537f16 Mon Sep 17 00:00:00 2001
From: "Rene Vergara A." <rvergara59@protonmail.com>
Date: Sun, 2 Jun 2024 09:02:12 -0400
Subject: [PATCH] rvv041 - Improvement - Unused code removed

---
 src/Zenith/CLI.hs | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/src/Zenith/CLI.hs b/src/Zenith/CLI.hs
index c57cd10..dfe58a0 100644
--- a/src/Zenith/CLI.hs
+++ b/src/Zenith/CLI.hs
@@ -196,8 +196,6 @@ data State = State
   , _abForm :: !(Form AdrBookEntry () Name)
   , _abCurAdrs :: !T.Text
   , _abTxt :: !T.Text
-  , _showConfirm :: Bool
-  , _confirmResult :: Maybe Bool
   }
 
 makeLenses ''State
@@ -1340,8 +1338,6 @@ runZenithCLI config = do
               (mkNewABForm (AdrBookEntry "" ""))
               " "
               ""
-              False
-              Nothing
     Left e -> print $
       "No Zebra node available on port " <>
       show port <> ". Check your configuration."