diff --git a/hledger-ui/Hledger/UI/AccountsScreen.hs b/hledger-ui/Hledger/UI/AccountsScreen.hs
index a9c45c6b4..b4555ae29 100644
--- a/hledger-ui/Hledger/UI/AccountsScreen.hs
+++ b/hledger-ui/Hledger/UI/AccountsScreen.hs
@@ -6,6 +6,7 @@
 
 module Hledger.UI.AccountsScreen
  (asNew
+ ,asUpdate
  ,asDraw
  ,asHandle
  ,asSetSelectedAccount
diff --git a/hledger-ui/Hledger/UI/ErrorScreen.hs b/hledger-ui/Hledger/UI/ErrorScreen.hs
index b15f9faff..b640ebe78 100644
--- a/hledger-ui/Hledger/UI/ErrorScreen.hs
+++ b/hledger-ui/Hledger/UI/ErrorScreen.hs
@@ -6,7 +6,9 @@
 {-# OPTIONS_GHC -Wno-incomplete-record-updates #-}
 
 module Hledger.UI.ErrorScreen
- (esDraw
+ (esNew
+ ,esUpdate
+ ,esDraw
  ,esHandle
  ,uiCheckBalanceAssertions
  ,uiReloadJournal
diff --git a/hledger-ui/Hledger/UI/RegisterScreen.hs b/hledger-ui/Hledger/UI/RegisterScreen.hs
index 4397826de..0adbf4b5a 100644
--- a/hledger-ui/Hledger/UI/RegisterScreen.hs
+++ b/hledger-ui/Hledger/UI/RegisterScreen.hs
@@ -7,12 +7,13 @@
 {-# OPTIONS_GHC -Wno-incomplete-record-updates #-}
 
 module Hledger.UI.RegisterScreen
- (rsNew
- ,rsDraw
- ,rsHandle
- ,rsSetAccount
- ,rsCenterSelection
- )
+(rsNew
+,rsUpdate
+,rsDraw
+,rsHandle
+,rsSetAccount
+,rsCenterSelection
+)
 where
 
 import Control.Monad
diff --git a/hledger-ui/Hledger/UI/TransactionScreen.hs b/hledger-ui/Hledger/UI/TransactionScreen.hs
index 10b8679b8..b732876eb 100644
--- a/hledger-ui/Hledger/UI/TransactionScreen.hs
+++ b/hledger-ui/Hledger/UI/TransactionScreen.hs
@@ -6,9 +6,10 @@
 {-# OPTIONS_GHC -Wno-incomplete-record-updates #-}
 
 module Hledger.UI.TransactionScreen
-( tsNew
-, tsDraw
-, tsHandle
+(tsNew
+,tsUpdate
+,tsDraw
+,tsHandle
 ) where
 
 import Control.Monad