diff options
author | jao <jao@gnu.org> | 2018-11-25 06:13:29 +0000 |
---|---|---|
committer | jao <jao@gnu.org> | 2018-11-25 06:13:29 +0000 |
commit | 9d2c98871bbd04c585fae034072f934b5c3e8093 (patch) | |
tree | 468bb9565efe6e14bad3828d21912ca4155aafd3 /src/lib/Xmobar.hs | |
parent | 3cf0041960837701c325b698460678aea1c449b4 (diff) | |
download | xmobar-9d2c98871bbd04c585fae034072f934b5c3e8093.tar.gz xmobar-9d2c98871bbd04c585fae034072f934b5c3e8093.tar.bz2 |
Parsers wee refactoring
Diffstat (limited to 'src/lib/Xmobar.hs')
-rw-r--r-- | src/lib/Xmobar.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/lib/Xmobar.hs b/src/lib/Xmobar.hs index ecc664a..897d671 100644 --- a/src/lib/Xmobar.hs +++ b/src/lib/Xmobar.hs @@ -46,7 +46,7 @@ import Control.Exception (bracket) import Xmobar.Config import Xmobar.Runnable -import Xmobar.Parsers +import Xmobar.Template import Xmobar.System.Signal (setupSignalHandler, withDeferSignals) import Xmobar.X11.Types import Xmobar.X11.EventLoop (startLoop, startCommand) @@ -89,7 +89,7 @@ xmobar conf = withDeferSignals $ do d <- openDisplay "" fs <- initFont d (font conf) fl <- mapM (initFont d) (additionalFonts conf) - cls <- mapM (parseTemplate conf) (splitTemplate conf) + cls <- mapM (parseCommands conf) (splitTemplate conf) sig <- setupSignalHandler bracket (mapM (mapM $ startCommand sig) cls) cleanupThreads |