rvv041 - Code Optimization

- Some comments removed
2024-06-03 22:10:30 -04:00 · 2024-06-03 22:10:30 -04:00 · 8754c79079
commit 8754c79079
parent 4f0fa9bc34
1 changed files with 2 additions and 5 deletions
--- a/src/Zenith/CLI.hs
+++ b/src/Zenith/CLI.hs
@ -1105,11 +1105,8 @@ appEvent (BT.VtyEvent e) = do
                          BT.modify $ set dialogBox AdrBookForm
                       -- Show AddressBook entry data  
                       V.EvKey V.KEnter [] -> do 
--                         case L.listSelectedElement $ s ^. abAddresses of
--                            Just (_, a) -> do
-                              BT.modify $ set displayBox AdrBookEntryDisplay
--                            _ -> do 
--q                                BT.modify $ set dialogBox Blank    
+                          BT.modify $ set displayBox AdrBookEntryDisplay
+                          
                       -- Process any other event       
                       ev -> BT.zoom abAddresses $ L.handleListEvent ev
                   -- Process new address book entry