From 89a0c7a308063f451e89271192ec7e62f7b75067 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Wed, 17 Oct 2018 07:25:56 -0700 Subject: [PATCH] ui: comment --- hledger-ui/Hledger/UI/Main.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/hledger-ui/Hledger/UI/Main.hs b/hledger-ui/Hledger/UI/Main.hs index f7128feb4..ab392d092 100644 --- a/hledger-ui/Hledger/UI/Main.hs +++ b/hledger-ui/Hledger/UI/Main.hs @@ -170,6 +170,8 @@ runBrickUi uopts@UIOpts{cliopts_=copts@CliOpts{inputopts_=_iopts,reportopts_=rop , appDraw = \ui -> sDraw (aScreen ui) ui } + -- print (length (show ui)) >> exitSuccess -- show any debug output to this point & quit + if not (watch_ uopts') then void $ defaultMain brickapp ui