slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

;cln: ui: clarify watch loop

Browse Source
This commit is contained in:
Simon Michael 2021-07-19 13:18:20 -10:00
parent c606f874fb
commit a83c2f6950
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
hledger-ui/Hledger/UI/Main.hs
View File

@ -195,10 +195,11 @@ runBrickUi uopts@UIOpts{cliopts_=copts@CliOpts{inputopts_=_iopts,reportspec_=rsp
writeChan eventChan dc writeChan eventChan dc
watchDate new watchDate new
withAsync withAsync
(getCurrentDay >>= watchDate) -- run this small task asynchronously:
$ \_ -> (getCurrentDay >>= watchDate)
-- until this main task terminates:
$ \_async ->
-- start one or more background threads reporting changes in the directories of our files -- start one or more background threads reporting changes in the directories of our files
-- XXX many quick successive saves causes the problems listed in BUGS -- XXX many quick successive saves causes the problems listed in BUGS
-- with Debounce increased to 1s it easily gets stuck on an error or blank screen -- with Debounce increased to 1s it easily gets stuck on an error or blank screen