diff --git a/hledger-ui/Hledger/UI/AccountsScreen.hs b/hledger-ui/Hledger/UI/AccountsScreen.hs
index 2e40e68c9..84184c521 100644
--- a/hledger-ui/Hledger/UI/AccountsScreen.hs
+++ b/hledger-ui/Hledger/UI/AccountsScreen.hs
@@ -220,15 +220,10 @@ handleAccountsScreen st@AppState{
         -- Vty.EvKey (Vty.KChar 'l') [Vty.MCtrl] -> do
 
         Vty.EvKey (Vty.KChar 'g') [] -> do
-          ej <- liftIO $ journalReload j
+          ej <- liftIO $ journalReload j  -- (ej, changed) <- liftIO $ journalReloadIfChanged copts j
           case ej of
             Right j' -> continue $ reload j' d st
             Left err -> continue $ screenEnter d ES.screen{esState=err} st
-          -- (ej, changed) <- liftIO $ journalReloadIfChanged copts j
-          -- case (changed, ej) of
-          --   (True, Right j') -> reload st{ajournal=j'}
-          --   -- (True, Left err) -> continue st{amsg=err} -- XXX report parse error
-          --   _                -> continue st
 
         Vty.EvKey (Vty.KChar '-') [] -> continue $ reload' d $ decDepth st
         Vty.EvKey (Vty.KChar '+') [] -> continue $ reload' d $ incDepth st
diff --git a/hledger-ui/hledger-ui.1.md b/hledger-ui/hledger-ui.1.md
index fcaf820da..07c8bdba2 100644
--- a/hledger-ui/hledger-ui.1.md
+++ b/hledger-ui/hledger-ui.1.md
@@ -179,6 +179,5 @@ The need to precede options with `--` when invoked from hledger is awkward.
 `-V` doesn't affect the register screen.
 
 When you press `g`, the current and all previous screens are
-regenerated.  With large data this will cause a noticeable pause,
-which could be reduced if the previous screens were processed in a
-background thread.
+regenerated, which may cause a noticeable pause. Also there is no
+visual indication that this is in progress.