diff --git a/hledger-ui/Hledger/UI/Main.hs b/hledger-ui/Hledger/UI/Main.hs index 0be3d81cf..29988b3f6 100644 --- a/hledger-ui/Hledger/UI/Main.hs +++ b/hledger-ui/Hledger/UI/Main.hs @@ -229,6 +229,6 @@ runBrickUi uopts@UIOpts{uoCliOpts=copts@CliOpts{inputopts_=_iopts,reportspec_=rs ) -- and start the app. Must be inside the withManager block - let mkvty = mkVty mempty - vty0 <- mkvty - void $ customMain vty0 mkvty (Just eventChan) brickapp ui + let vtyhandle = mkVty mempty + vty <- vtyhandle + void $ customMain vty vtyhandle (Just eventChan) brickapp ui