From c9067883343bacef3110e10cae13071335cc6ed4 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Thu, 11 Sep 2025 16:45:52 +0100
Subject: [PATCH] ;dev:ui: RegisterScreen: cleanup

---
 hledger-ui/Hledger/UI/RegisterScreen.hs | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/hledger-ui/Hledger/UI/RegisterScreen.hs b/hledger-ui/Hledger/UI/RegisterScreen.hs
index 67bf9f1d3..a736f12cc 100644
--- a/hledger-ui/Hledger/UI/RegisterScreen.hs
+++ b/hledger-ui/Hledger/UI/RegisterScreen.hs
@@ -354,8 +354,4 @@ rsCenterSelection ui = return ui
 rsEnterTransactionScreen :: AccountName -> [NumberedTransaction] -> NumberedTransaction -> UIState -> EventM Name UIState ()
 rsEnterTransactionScreen acct nts nt ui = do
   dbguiEv "rsEnterTransactionScreen"
-  put' $
-    pushScreen (tsNew acct nts nt)
-    ui
-
-
+  put' $ pushScreen (tsNew acct nts nt) ui