formatting

input-output-hk · Sep 18, 2023 · d1b2f7f · d1b2f7f
1 parent 9885e2c
commit d1b2f7f
Showing 1 changed file with 5 additions and 5 deletions.
diff --git a/src/Component/App.purs b/src/Component/App.purs
@@ -172,11 +172,11 @@ mkApp = do
           untilJust do
             updates <- liftEffect $ contractStream.getLiveState
             case updates of
-                Just updates' -> do
-                  let
-                    new = mkAppContractInfoMap possibleWalletContext updates'
-                  liftEffect $ setContractMap $ Just new
-                Nothing -> pure unit
+              Just updates' -> do
+                let
+                  new = mkAppContractInfoMap possibleWalletContext updates'
+                liftEffect $ setContractMap $ Just new
+              Nothing -> pure unit
             delay (Milliseconds 1_000.0)
             pure Nothing