From 658dd00771852286bb9ce007d11db869c237d934 Mon Sep 17 00:00:00 2001 From: jao Date: Sun, 25 Nov 2018 03:08:40 +0000 Subject: Refactoring: Xmobar.X11 --- src/lib/Xmobar.hs | 13 ++++++------- 1 file changed, 6 insertions(+), 7 deletions(-) (limited to 'src/lib/Xmobar.hs') diff --git a/src/lib/Xmobar.hs b/src/lib/Xmobar.hs index 547c549..2b160a1 100644 --- a/src/lib/Xmobar.hs +++ b/src/lib/Xmobar.hs @@ -17,10 +17,6 @@ module Xmobar (xmobar, Runnable (..), module Xmobar.Config) where -import Xmobar.EventLoop (startLoop, startCommand) -import Xmobar.Config -import Xmobar.Runnable - import Data.Foldable (for_) import qualified Data.Map as Map @@ -28,11 +24,14 @@ import Graphics.X11.Xlib import Control.Concurrent.Async (Async, cancel) import Control.Exception (bracket) +import Xmobar.Config +import Xmobar.Runnable import Xmobar.Parsers -import Xmobar.XUtil import Xmobar.Signal (setupSignalHandler, withDeferSignals) -import Xmobar.Window -import Xmobar.Types +import Xmobar.X11.Types +import Xmobar.X11.EventLoop (startLoop, startCommand) +import Xmobar.X11.XUtil +import Xmobar.X11.Window splitTemplate :: Config -> [String] splitTemplate conf = -- cgit v1.2.3