src/Zenith/CLI.hs

@@ -878,7 +878,6 @@ scanZebra dbP zHost zPort b eChan znet = do
                   liftIO $ BC.writeBChan eChan $ TickMsg "startSync"
                   return ()
             else do
-              liftIO $ BC.writeBChan eChan $ TickVal 1.0
               liftIO $ BC.writeBChan eChan $ TickMsg "startSync"
   where
     processBlock :: ConnectionPool -> Float -> Int -> IO ()
@@ -928,8 +927,7 @@ appEvent (BT.AppEvent t) = do
       case s ^. displayBox of
         AddrDisplay -> return ()
         MsgDisplay -> do
-          if m == "startSync"
-            then do
+          when (m == "startSync") $ do
             selWallet <-
               do case L.listSelectedElement $ s ^. wallets of
                    Nothing -> do
@@ -957,7 +955,6 @@ appEvent (BT.AppEvent t) = do
             BT.put ns
             BT.modify $ set msg ""
             BT.modify $ set displayBox BlankDisplay
-            else return ()
         PhraseDisplay -> return ()
         TxDisplay -> return ()
         TxIdDisplay -> return ()