summaryrefslogtreecommitdiffhomepage
path: root/src/lib
diff options
context:
space:
mode:
Diffstat (limited to 'src/lib')
-rw-r--r--src/lib/Xmobar.hs2
-rw-r--r--src/lib/Xmobar/Config.hs3
-rw-r--r--src/lib/Xmobar/Run/EventLoop.hs (renamed from src/lib/Xmobar/X11/EventLoop.hs)2
3 files changed, 4 insertions, 3 deletions
diff --git a/src/lib/Xmobar.hs b/src/lib/Xmobar.hs
index f125a72..b4543f6 100644
--- a/src/lib/Xmobar.hs
+++ b/src/lib/Xmobar.hs
@@ -47,9 +47,9 @@ import Control.Exception (bracket)
import Xmobar.Config
import Xmobar.Run.Runnable
import Xmobar.Run.Template
+import Xmobar.Run.EventLoop (startLoop, startCommand)
import Xmobar.System.Signal (setupSignalHandler, withDeferSignals)
import Xmobar.X11.Types
-import Xmobar.X11.EventLoop (startLoop, startCommand)
import Xmobar.X11.XUtil
import Xmobar.X11.Window
import Xmobar.Plugins.BufferedPipeReader
diff --git a/src/lib/Xmobar/Config.hs b/src/lib/Xmobar/Config.hs
index c38bd6f..a07af9e 100644
--- a/src/lib/Xmobar/Config.hs
+++ b/src/lib/Xmobar/Config.hs
@@ -48,7 +48,8 @@ data Config =
, border :: Border -- ^ NoBorder TopB BottomB or FullB
, borderColor :: String -- ^ Border color
, borderWidth :: Int -- ^ Border width
- , alpha :: Int -- ^ Transparency from 0 (transparent) to 255 (opaque)
+ , alpha :: Int -- ^ Transparency from 0 (transparent)
+ -- to 255 (opaque)
, hideOnStart :: Bool -- ^ Hide (Unmap) the window on
-- initialization
, allDesktops :: Bool -- ^ Tell the WM to map to all desktops
diff --git a/src/lib/Xmobar/X11/EventLoop.hs b/src/lib/Xmobar/Run/EventLoop.hs
index f97c56b..a4385d1 100644
--- a/src/lib/Xmobar/X11/EventLoop.hs
+++ b/src/lib/Xmobar/Run/EventLoop.hs
@@ -17,7 +17,7 @@
------------------------------------------------------------------------------
-module Xmobar.X11.EventLoop (startLoop, startCommand) where
+module Xmobar.Run.EventLoop (startLoop, startCommand) where
import Prelude hiding (lookup)
import Graphics.X11.Xlib hiding (textExtents, textWidth)