diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/lib/Xmobar.hs | 2 | ||||
| -rw-r--r-- | src/lib/Xmobar/Config.hs | 3 | ||||
| -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) |