From 324ed663c3784e507239a1c85bac2d0e30120799 Mon Sep 17 00:00:00 2001
From: "Rene Vergara A." <rvergara59@protonmail.com>
Date: Fri, 11 Oct 2024 21:01:50 -0400
Subject: [PATCH] rvv001 - Shield - Deshield process 	 DeShield form  - 
 Cancel button moved  to the right of process button

---
 src/Zenith/GUI.hs | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/src/Zenith/GUI.hs b/src/Zenith/GUI.hs
index a508c09..6f76bac 100644
--- a/src/Zenith/GUI.hs
+++ b/src/Zenith/GUI.hs
@@ -1032,7 +1032,6 @@ buildUI wenv model = widgetTree
            ]) `styleBasic`
       [bgColor (white & L.a .~ 0.5)]
     deShieldOverlay =
-      alert CloseDeShield $
       box
         (vstack
            [ filler
@@ -1081,8 +1080,10 @@ buildUI wenv model = widgetTree
                           [alignMiddle]
                           (hstack
                              [ filler 
-                             , mainButton "Proceed" NotImplemented `nodeEnabled`
-                               (model ^. amountValid && model ^. recipientValid)
+                             , mainButton "Proceed" NotImplemented `nodeEnabled` True
+--                               (model ^. amountValid && model ^. recipientValid)
+                             , spacer 
+                             , mainButton "Cancel" CloseDeShield `nodeEnabled` True
                              , filler
                              ])
                       ]) `styleBasic`