ndwarshuis
/
xmonad-config
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

ENH run all of xmobar in rio

This commit is contained in:
Nathan Dwarshuis 2022-12-31 22:24:20 -05:00
parent f6c0596716
commit a997cac7a3
1 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
bin/xmobar.hs
View File

@ -50,10 +50,11 @@ parse ["--test"] = void $ withCache . evalConfig =<< connectDBus
parse _ = usage parse _ = usage
run :: IO () run :: IO ()
run = do run = withCache $ do
db <- connectDBus db <- connectDBus
c <- withCache $ evalConfig db c <- evalConfig db
disconnectDBus db disconnectDBus db
liftIO $ do
-- this is needed to see any printed messages -- this is needed to see any printed messages
hFlush stdout hFlush stdout
xmobar c xmobar c