Split Modules into Library & Executable Structure

Move the Main module to a new `app` directory. All other modules have
been nested under the `Xmobar` name. Lots of module headers & imports
were updated.

59 files changed, 195 insertions, 195 deletions

diff --git a/src/Main.hs b/app/Main.hs
index 9780114..646ae11 100644
--- a/src/Main.hs
+++ b/app/Main.hs
@@ -21,9 +21,9 @@ module Main ( -- * Main Stuff
             ) where
 
 import Xmobar
-import Parsers
-import Config
-import XUtil
+import Xmobar.Parsers
+import Xmobar.Config
+import Xmobar.XUtil
 
 import Data.Foldable (for_)
 import Data.List (intercalate)
@@ -43,7 +43,7 @@ import Control.Exception (bracket)
 import Control.Monad (unless)
 import Text.Read (readMaybe)
 
-import Signal (setupSignalHandler, withDeferSignals)
+import Xmobar.Signal (setupSignalHandler, withDeferSignals)
 
 -- $main
 
diff --git a/src/Xmobar.hs b/src/Xmobar.hs
index 30ad11e..e4eb4b7 100644
--- a/src/Xmobar.hs
+++ b/src/Xmobar.hs
@@ -47,24 +47,24 @@ import Data.Bits
 import Data.Map hiding (foldr, map, filter)
 import Data.Maybe (fromJust, isJust)
 
-import Bitmap
-import Config
-import Parsers
-import Commands
-import Actions
-import Runnable
-import Signal
-import Window
-import XUtil
-import ColorCache
+import Xmobar.Bitmap as Bitmap
+import Xmobar.Config
+import Xmobar.Parsers
+import Xmobar.Commands
+import Xmobar.Actions
+import Xmobar.Runnable
+import Xmobar.Signal
+import Xmobar.Window
+import Xmobar.XUtil
+import Xmobar.ColorCache
 
 #ifdef XFT
 import Graphics.X11.Xft
-import MinXft (drawBackground)
+import Xmobar.MinXft (drawBackground)
 #endif
 
 #ifdef DBUS
-import IPC.DBus
+import Xmobar.IPC.DBus
 #endif
 
 -- $main
diff --git a/src/Actions.hs b/src/Xmobar/Actions.hs
index cd8ecb9..7901845 100644
--- a/src/Actions.hs
+++ b/src/Xmobar/Actions.hs
@@ -10,7 +10,7 @@
 --
 -----------------------------------------------------------------------------
 
-module Actions (Action(..), runAction, stripActions) where
+module Xmobar.Actions (Action(..), runAction, stripActions) where
 
 import System.Process (system)
 import Control.Monad (void)
diff --git a/src/Bitmap.hs b/src/Xmobar/Bitmap.hs
index 494c39c..314ce02 100644
--- a/src/Bitmap.hs
+++ b/src/Xmobar/Bitmap.hs
@@ -11,7 +11,7 @@
 --
 -----------------------------------------------------------------------------
 
-module Bitmap
+module Xmobar.Bitmap
  ( updateCache
  , drawBitmap
  , Bitmap(..)) where
@@ -23,12 +23,12 @@ import Graphics.X11.Xlib
 import System.Directory (doesFileExist)
 import System.FilePath ((</>))
 import System.Mem.Weak ( addFinalizer )
-import ColorCache
-import Parsers (Widget(..))
-import Actions (Action)
+import Xmobar.ColorCache
+import Xmobar.Parsers (Widget(..))
+import Xmobar.Actions (Action)
 
 #ifdef XPM
-import XPMFile(readXPMFile)
+import Xmobar.XPMFile(readXPMFile)
 import Control.Applicative((<|>))
 #endif
 
diff --git a/src/ColorCache.hs b/src/Xmobar/ColorCache.hs
index 3f8d7b4..f17aa0d 100644
--- a/src/ColorCache.hs
+++ b/src/Xmobar/ColorCache.hs
@@ -17,12 +17,12 @@
 
 #if defined XFT
 
-module ColorCache(withColors, withDrawingColors) where
+module Xmobar.ColorCache(withColors, withDrawingColors) where
 
-import MinXft
+import Xmobar.MinXft
 
 #else
-module ColorCache(withColors) where
+module Xmobar.ColorCache(withColors) where
 
 #endif
 
diff --git a/src/Commands.hs b/src/Xmobar/Commands.hs
index 5b11ca3..ececdd9 100644
--- a/src/Commands.hs
+++ b/src/Xmobar/Commands.hs
@@ -17,7 +17,7 @@
 --
 -----------------------------------------------------------------------------
 
-module Commands
+module Xmobar.Commands
     ( Command (..)
     , Exec    (..)
     , tenthSeconds
@@ -31,8 +31,8 @@ import System.Process
 import System.Exit
 import System.IO (hClose)
 
-import Signal
-import XUtil
+import Xmobar.Signal
+import Xmobar.XUtil
 
 class Show e => Exec e where
     alias   :: e -> String
diff --git a/src/Config.hs b/src/Xmobar/Config.hs
index 43ddf51..21b29fa 100644
--- a/src/Config.hs
+++ b/src/Xmobar/Config.hs
@@ -14,7 +14,7 @@
 --
 -----------------------------------------------------------------------------
 
-module Config
+module Xmobar.Config
     ( -- * Configuration
       -- $config
       Config (..)
@@ -24,27 +24,27 @@ module Config
     ) where
 
 
-import Commands
-import {-# SOURCE #-} Runnable
-import Plugins.Monitors
-import Plugins.Date
-import Plugins.PipeReader
-import Plugins.BufferedPipeReader
-import Plugins.MarqueePipeReader
-import Plugins.CommandReader
-import Plugins.StdinReader
-import Plugins.XMonadLog
-import Plugins.EWMH
-import Plugins.Kbd
-import Plugins.Locks
+import Xmobar.Commands
+import {-# SOURCE #-} Xmobar.Runnable
+import Xmobar.Plugins.Monitors
+import Xmobar.Plugins.Date
+import Xmobar.Plugins.PipeReader
+import Xmobar.Plugins.BufferedPipeReader
+import Xmobar.Plugins.MarqueePipeReader
+import Xmobar.Plugins.CommandReader
+import Xmobar.Plugins.StdinReader
+import Xmobar.Plugins.XMonadLog
+import Xmobar.Plugins.EWMH
+import Xmobar.Plugins.Kbd
+import Xmobar.Plugins.Locks
 
 #ifdef INOTIFY
-import Plugins.Mail
-import Plugins.MBox
+import Xmobar.Plugins.Mail
+import Xmobar.Plugins.MBox
 #endif
 
 #ifdef DATEZONE
-import Plugins.DateZone
+import Xmobar.Plugins.DateZone
 #endif
 
 -- $config
diff --git a/src/Environment.hs b/src/Xmobar/Environment.hs
index 1b7e48c..8a9223a 100644
--- a/src/Environment.hs
+++ b/src/Xmobar/Environment.hs
@@ -11,7 +11,7 @@
 -- A function to expand environment variables in strings
 --
 -----------------------------------------------------------------------------
-module Environment(expandEnv) where
+module Xmobar.Environment(expandEnv) where
 
 import Control.Applicative  ((<$>))
 import Data.Maybe           (fromMaybe)
diff --git a/src/IPC/DBus.hs b/src/Xmobar/IPC/DBus.hs
index f6fdcb7..894637b 100644
--- a/src/IPC/DBus.hs
+++ b/src/Xmobar/IPC/DBus.hs
@@ -12,7 +12,7 @@
 --
 -----------------------------------------------------------------------------
 
-module IPC.DBus (runIPC) where
+module Xmobar.IPC.DBus (runIPC) where
 
 import DBus
 import DBus.Client hiding (interfaceName)
@@ -23,7 +23,7 @@ import Control.Exception (handle)
 import System.IO (stderr, hPutStrLn)
 import Control.Monad.IO.Class (liftIO)
 
-import Signal
+import Xmobar.Signal
 
 busName :: BusName
 busName = busName_ "org.Xmobar.Control"
diff --git a/src/Localize.hsc b/src/Xmobar/Localize.hsc
index 34d0fd9..984aa2b 100644
--- a/src/Localize.hsc
+++ b/src/Xmobar/Localize.hsc
@@ -13,7 +13,7 @@
 --
 -----------------------------------------------------------------------------
 
-module Localize
+module Xmobar.Localize
     ( setupTimeLocale,
       getTimeLocale
     ) where
diff --git a/src/MinXft.hsc b/src/Xmobar/MinXft.hsc
index b64a8b8..0bf36c7 100644
--- a/src/MinXft.hsc
+++ b/src/Xmobar/MinXft.hsc
@@ -20,7 +20,7 @@
 
 {-# LANGUAGE ForeignFunctionInterface, EmptyDataDecls #-}
 
-module MinXft ( AXftColor
+module Xmobar.MinXft ( AXftColor
               , AXftDraw (..)
               , AXftFont
               , mallocAXftColor
diff --git a/src/Parsers.hs b/src/Xmobar/Parsers.hs
index 8d62968..d76f8f7 100644
--- a/src/Parsers.hs
+++ b/src/Xmobar/Parsers.hs
@@ -13,17 +13,17 @@
 --
 -----------------------------------------------------------------------------
 
-module Parsers
+module Xmobar.Parsers
     ( parseString
     , parseTemplate
     , parseConfig
     , Widget(..)
     ) where
 
-import Config
-import Runnable
-import Commands
-import Actions
+import Xmobar.Config
+import Xmobar.Runnable
+import Xmobar.Commands
+import Xmobar.Actions
 
 import Control.Monad (guard, mzero)
 import qualified Data.Map as Map
diff --git a/src/Plugins.hs b/src/Xmobar/Plugins.hs
index 4255244..75ee306 100644
--- a/src/Plugins.hs
+++ b/src/Xmobar/Plugins.hs
@@ -14,12 +14,12 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins
+module Xmobar.Plugins
     ( Exec (..)
     , tenthSeconds
     , readFileSafe
     , hGetLineSafe
     ) where
 
-import Commands
-import XUtil
+import Xmobar.Commands
+import Xmobar.XUtil
diff --git a/src/Plugins/BufferedPipeReader.hs b/src/Xmobar/Plugins/BufferedPipeReader.hs
index fb7d269..d4d30a1 100644
--- a/src/Plugins/BufferedPipeReader.hs
+++ b/src/Xmobar/Plugins/BufferedPipeReader.hs
@@ -12,7 +12,7 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.BufferedPipeReader where
+module Xmobar.Plugins.BufferedPipeReader where
 
 import Control.Monad(forM_, when, void)
 import Control.Concurrent
@@ -20,9 +20,9 @@ import Control.Concurrent.STM
 import System.IO
 import System.IO.Unsafe(unsafePerformIO)
 
-import Environment
-import Plugins
-import Signal
+import Xmobar.Environment
+import Xmobar.Plugins
+import Xmobar.Signal
 
 data BufferedPipeReader = BufferedPipeReader String [(Int, Bool, String)]
     deriving (Read, Show)
diff --git a/src/Plugins/CommandReader.hs b/src/Xmobar/Plugins/CommandReader.hs
index 7c7c92d..80b6299 100644
--- a/src/Plugins/CommandReader.hs
+++ b/src/Xmobar/Plugins/CommandReader.hs
@@ -13,10 +13,10 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.CommandReader where
+module Xmobar.Plugins.CommandReader where
 
 import System.IO
-import Plugins
+import Xmobar.Plugins
 import System.Process(runInteractiveCommand, getProcessExitCode)
 
 data CommandReader = CommandReader String String
diff --git a/src/Plugins/Date.hs b/src/Xmobar/Plugins/Date.hs
index b2d32da..fdc6a56 100644
--- a/src/Plugins/Date.hs
+++ b/src/Xmobar/Plugins/Date.hs
@@ -17,9 +17,9 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Date (Date(..)) where
+module Xmobar.Plugins.Date (Date(..)) where
 
-import Plugins
+import Xmobar.Plugins
 
 #if ! MIN_VERSION_time(1,5,0)
 import System.Locale
diff --git a/src/Plugins/DateZone.hs b/src/Xmobar/Plugins/DateZone.hs
index 401e77c..753f530 100644
--- a/src/Plugins/DateZone.hs
+++ b/src/Xmobar/Plugins/DateZone.hs
@@ -20,9 +20,9 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.DateZone (DateZone(..)) where
+module Xmobar.Plugins.DateZone (DateZone(..)) where
 
-import Plugins
+import Xmobar.Plugins
 
 
 #ifdef DATEZONE
@@ -30,7 +30,7 @@ import Control.Concurrent.STM
 
 import System.IO.Unsafe
 
-import Localize
+import Xmobar.Localize
 import Data.Time.Format
 import Data.Time.LocalTime
 import Data.Time.LocalTime.TimeZone.Olson
@@ -41,7 +41,7 @@ import System.Locale (TimeLocale)
 #endif
 #else
 import System.IO
-import Plugins.Date
+import Xmobar.Plugins.Date
 #endif
 
 
diff --git a/src/Plugins/EWMH.hs b/src/Xmobar/Plugins/EWMH.hs
index 1aac83d..363ec90 100644
--- a/src/Plugins/EWMH.hs
+++ b/src/Xmobar/Plugins/EWMH.hs
@@ -15,21 +15,21 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.EWMH (EWMH(..)) where
+module Xmobar.Plugins.EWMH (EWMH(..)) where
 
 import Control.Applicative (Applicative(..))
 import Control.Monad.State
 import Control.Monad.Reader
 import Graphics.X11 hiding (Modifier, Color)
 import Graphics.X11.Xlib.Extras
-import Plugins
+import Xmobar.Plugins
 #ifdef UTF8
 #undef UTF8
 import Codec.Binary.UTF8.String as UTF8
 #define UTF8
 #endif
 import Foreign.C (CChar, CLong)
-import XUtil (nextEvent')
+import Xmobar.XUtil (nextEvent')
 
 import Data.List (intersperse, intercalate)
 
diff --git a/src/Plugins/Kbd.hsc b/src/Xmobar/Plugins/Kbd.hsc
index a4bb90d..763150b 100644
--- a/src/Plugins/Kbd.hsc
+++ b/src/Xmobar/Plugins/Kbd.hsc
@@ -13,16 +13,16 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Kbd where
+module Xmobar.Plugins.Kbd where
 
 import Graphics.X11.Xlib
 import Graphics.X11.Xlib.Extras
 import Foreign
 import Foreign.C.Types
 import Foreign.C.String
-import Plugins
+import Xmobar.Plugins
 import Control.Monad (forever)
-import XUtil (nextEvent')
+import Xmobar.XUtil (nextEvent')
 import Data.List (isPrefixOf, findIndex)
 import Data.Maybe (fromJust)
 
diff --git a/src/Plugins/Locks.hs b/src/Xmobar/Plugins/Locks.hs
index 79b1583..9a971e5 100644
--- a/src/Plugins/Locks.hs
+++ b/src/Xmobar/Plugins/Locks.hs
@@ -12,16 +12,16 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Locks where
+module Xmobar.Plugins.Locks where
 
 import Graphics.X11
 import Data.List
 import Data.Bits
 import Control.Monad
 import Graphics.X11.Xlib.Extras
-import Plugins
-import Plugins.Kbd
-import XUtil (nextEvent')
+import Xmobar.Plugins
+import Xmobar.Plugins.Kbd
+import Xmobar.XUtil (nextEvent')
 
 data Locks = Locks
     deriving (Read, Show)
diff --git a/src/Plugins/MBox.hs b/src/Xmobar/Plugins/MBox.hs
index 48a6228..2281629 100644
--- a/src/Plugins/MBox.hs
+++ b/src/Xmobar/Plugins/MBox.hs
@@ -13,12 +13,12 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.MBox (MBox(..)) where
+module Xmobar.Plugins.MBox (MBox(..)) where
 
 import Prelude
-import Plugins
+import Xmobar.Plugins
 #ifdef INOTIFY
-import Plugins.Utils (changeLoop, expandHome)
+import Xmobar.Plugins.Utils (changeLoop, expandHome)
 
 import Control.Monad (when)
 import Control.Concurrent.STM
diff --git a/src/Plugins/Mail.hs b/src/Xmobar/Plugins/Mail.hs
index 538bcf7..c41b5b3 100644
--- a/src/Plugins/Mail.hs
+++ b/src/Xmobar/Plugins/Mail.hs
@@ -13,11 +13,11 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Mail where
+module Xmobar.Plugins.Mail where
 
-import Plugins
+import Xmobar.Plugins
 #ifdef INOTIFY
-import Plugins.Utils (expandHome, changeLoop)
+import Xmobar.Plugins.Utils (expandHome, changeLoop)
 
 import Control.Monad
 import Control.Concurrent.STM
diff --git a/src/Plugins/MarqueePipeReader.hs b/src/Xmobar/Plugins/MarqueePipeReader.hs
index c46fff4..ad6f27f 100644
--- a/src/Plugins/MarqueePipeReader.hs
+++ b/src/Xmobar/Plugins/MarqueePipeReader.hs
@@ -12,11 +12,11 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.MarqueePipeReader where
+module Xmobar.Plugins.MarqueePipeReader where
 
 import System.IO (openFile, IOMode(ReadWriteMode), Handle)
-import Environment
-import Plugins (tenthSeconds, Exec(alias, start), hGetLineSafe)
+import Xmobar.Environment
+import Xmobar.Plugins (tenthSeconds, Exec(alias, start), hGetLineSafe)
 import System.Posix.Files (getFileStatus, isNamedPipe)
 import Control.Concurrent(forkIO, threadDelay)
 import Control.Concurrent.STM (TChan, atomically, writeTChan, tryReadTChan, newTChan)
diff --git a/src/Plugins/Monitors.hs b/src/Xmobar/Plugins/Monitors.hs
index 08fd098..64d38f0 100644
--- a/src/Plugins/Monitors.hs
+++ b/src/Xmobar/Plugins/Monitors.hs
@@ -3,7 +3,7 @@
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Xmobar.Plugins.Monitors
--- Copyright   :  (c) 2010, 2011, 2012, 2013, 2017 Jose Antonio Ortega Ruiz
+-- Copyright   :  (c) 2010, 2011, 2012, 2013, 2017, 2018 Jose Antonio Ortega Ruiz
 --                (c) 2007-10 Andrea Rossato
 -- License     :  BSD-style (see LICENSE)
 --
@@ -15,45 +15,45 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors where
+module Xmobar.Plugins.Monitors where
 
-import Plugins
+import Xmobar.Plugins
 
-import Plugins.Monitors.Common (runM, runMD)
+import Xmobar.Plugins.Monitors.Common (runM, runMD)
 #ifdef WEATHER
-import Plugins.Monitors.Weather
-#endif
-import Plugins.Monitors.Net
-import Plugins.Monitors.Mem
-import Plugins.Monitors.Swap
-import Plugins.Monitors.Cpu
-import Plugins.Monitors.MultiCpu
-import Plugins.Monitors.Batt
-import Plugins.Monitors.Bright
-import Plugins.Monitors.Thermal
-import Plugins.Monitors.ThermalZone
-import Plugins.Monitors.CpuFreq
-import Plugins.Monitors.CoreTemp
-import Plugins.Monitors.Disk
-import Plugins.Monitors.Top
-import Plugins.Monitors.Uptime
-import Plugins.Monitors.CatInt
+import Xmobar.Plugins.Monitors.Weather
+#endif
+import Xmobar.Plugins.Monitors.Net
+import Xmobar.Plugins.Monitors.Mem
+import Xmobar.Plugins.Monitors.Swap
+import Xmobar.Plugins.Monitors.Cpu
+import Xmobar.Plugins.Monitors.MultiCpu
+import Xmobar.Plugins.Monitors.Batt
+import Xmobar.Plugins.Monitors.Bright
+import Xmobar.Plugins.Monitors.Thermal
+import Xmobar.Plugins.Monitors.ThermalZone
+import Xmobar.Plugins.Monitors.CpuFreq
+import Xmobar.Plugins.Monitors.CoreTemp
+import Xmobar.Plugins.Monitors.Disk
+import Xmobar.Plugins.Monitors.Top
+import Xmobar.Plugins.Monitors.Uptime
+import Xmobar.Plugins.Monitors.CatInt
 #ifdef UVMETER
-import Plugins.Monitors.UVMeter
+import Xmobar.Plugins.Monitors.UVMeter
 #endif
 #ifdef IWLIB
-import Plugins.Monitors.Wireless
+import Xmobar.Plugins.Monitors.Wireless
 #endif
 #ifdef LIBMPD
-import Plugins.Monitors.MPD
-import Plugins.Monitors.Common (runMBD)
+import Xmobar.Plugins.Monitors.MPD
+import Xmobar.Plugins.Monitors.Common (runMBD)
 #endif
 #ifdef ALSA
-import Plugins.Monitors.Volume
-import Plugins.Monitors.Alsa
+import Xmobar.Plugins.Monitors.Volume
+import Xmobar.Plugins.Monitors.Alsa
 #endif
 #ifdef MPRIS
-import Plugins.Monitors.Mpris
+import Xmobar.Plugins.Monitors.Mpris
 #endif
 
 data Monitors = Network      Interface   Args Rate
diff --git a/src/Plugins/Monitors/Batt.hs b/src/Xmobar/Plugins/Monitors/Batt.hs
index eeeb049..80f4275 100644
--- a/src/Plugins/Monitors/Batt.hs
+++ b/src/Xmobar/Plugins/Monitors/Batt.hs
@@ -13,10 +13,10 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.Batt ( battConfig, runBatt, runBatt' ) where
+module Xmobar.Plugins.Monitors.Batt ( battConfig, runBatt, runBatt' ) where
 
 import Control.Exception (SomeException, handle)
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 import System.FilePath ((</>))
 import System.IO (IOMode(ReadMode), hGetLine, withFile)
 import System.Posix.Files (fileExist)
diff --git a/src/Plugins/Monitors/Bright.hs b/src/Xmobar/Plugins/Monitors/Bright.hs
index cb510f6..fe72219 100644
--- a/src/Plugins/Monitors/Bright.hs
+++ b/src/Xmobar/Plugins/Monitors/Bright.hs
@@ -12,7 +12,7 @@
 ----
 -------------------------------------------------------------------------------
 
-module Plugins.Monitors.Bright (brightConfig, runBright) where
+module Xmobar.Plugins.Monitors.Bright (brightConfig, runBright) where
 
 import Control.Applicative ((<$>))
 import Control.Exception (SomeException, handle)
@@ -21,7 +21,7 @@ import System.FilePath ((</>))
 import System.Posix.Files (fileExist)
 import System.Console.GetOpt
 
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 
 data BrightOpts = BrightOpts { subDir :: String
                              , currBright :: String
diff --git a/src/Plugins/Monitors/CatInt.hs b/src/Xmobar/Plugins/Monitors/CatInt.hs
index aacbd71..781eded 100644
--- a/src/Plugins/Monitors/CatInt.hs
+++ b/src/Xmobar/Plugins/Monitors/CatInt.hs
@@ -10,10 +10,10 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.CatInt where
+module Xmobar.Plugins.Monitors.CatInt where
 
-import Plugins.Monitors.Common
-import Plugins.Monitors.CoreCommon
+import Xmobar.Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.CoreCommon
 
 catIntConfig :: IO MConfig
 catIntConfig = mkMConfig "<v>" ["v"]
diff --git a/src/Plugins/Monitors/Common.hs b/src/Xmobar/Plugins/Monitors/Common.hs
index 782a18f..272690b 100644
--- a/src/Plugins/Monitors/Common.hs
+++ b/src/Xmobar/Plugins/Monitors/Common.hs
@@ -13,7 +13,7 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.Common (
+module Xmobar.Plugins.Monitors.Common (
                        -- * Monitors
                        -- $monitor
                          Monitor
@@ -76,7 +76,7 @@ import Text.ParserCombinators.Parsec
 import System.Console.GetOpt
 import Control.Exception (SomeException,handle)
 
-import Plugins
+import Xmobar.Plugins
 -- $monitor
 
 type Monitor a = ReaderT MConfig IO a
diff --git a/src/Plugins/Monitors/CoreCommon.hs b/src/Xmobar/Plugins/Monitors/CoreCommon.hs
index 6298421..a84198e 100644
--- a/src/Plugins/Monitors/CoreCommon.hs
+++ b/src/Xmobar/Plugins/Monitors/CoreCommon.hs
@@ -14,7 +14,7 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.CoreCommon where
+module Xmobar.Plugins.Monitors.CoreCommon where
 
 #if __GLASGOW_HASKELL__ < 800
 import Control.Applicative
@@ -24,7 +24,7 @@ import Data.Char hiding (Space)
 import Data.Function
 import Data.List
 import Data.Maybe
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 import System.Directory
 
 checkedDataRetrieval :: (Ord a, Num a)
diff --git a/src/Plugins/Monitors/CoreTemp.hs b/src/Xmobar/Plugins/Monitors/CoreTemp.hs
index e19baf0..48fe428 100644
--- a/src/Plugins/Monitors/CoreTemp.hs
+++ b/src/Xmobar/Plugins/Monitors/CoreTemp.hs
@@ -12,10 +12,10 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.CoreTemp where
+module Xmobar.Plugins.Monitors.CoreTemp where
 
-import Plugins.Monitors.Common
-import Plugins.Monitors.CoreCommon
+import Xmobar.Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.CoreCommon
 
 
 import Data.Char (isDigit)
diff --git a/src/Plugins/Monitors/Cpu.hs b/src/Xmobar/Plugins/Monitors/Cpu.hs
index 0dba92a..6befe7d 100644
--- a/src/Plugins/Monitors/Cpu.hs
+++ b/src/Xmobar/Plugins/Monitors/Cpu.hs
@@ -13,9 +13,9 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.Cpu (startCpu) where
+module Xmobar.Plugins.Monitors.Cpu (startCpu) where
 
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 import qualified Data.ByteString.Lazy.Char8 as B
 import Data.IORef (IORef, newIORef, readIORef, writeIORef)
 import System.Console.GetOpt
diff --git a/src/Plugins/Monitors/CpuFreq.hs b/src/Xmobar/Plugins/Monitors/CpuFreq.hs
index 34240ee..1afedfa 100644
--- a/src/Plugins/Monitors/CpuFreq.hs
+++ b/src/Xmobar/Plugins/Monitors/CpuFreq.hs
@@ -12,10 +12,10 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.CpuFreq where
+module Xmobar.Plugins.Monitors.CpuFreq where
 
-import Plugins.Monitors.Common
-import Plugins.Monitors.CoreCommon
+import Xmobar.Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.CoreCommon
 
 -- |
 -- Cpu frequency default configuration. Default template contains only
diff --git a/src/Plugins/Monitors/Disk.hs b/src/Xmobar/Plugins/Monitors/Disk.hs
index 0019c1a..aedad75 100644
--- a/src/Plugins/Monitors/Disk.hs
+++ b/src/Xmobar/Plugins/Monitors/Disk.hs
@@ -12,10 +12,10 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.Disk (diskUConfig, runDiskU, startDiskIO) where
+module Xmobar.Plugins.Monitors.Disk (diskUConfig, runDiskU, startDiskIO) where
 
-import Plugins.Monitors.Common
-import StatFS
+import Xmobar.Plugins.Monitors.Common
+import Xmobar.StatFS
 
 import Data.IORef (IORef, newIORef, readIORef, writeIORef)
 
diff --git a/src/Plugins/Monitors/MPD.hs b/src/Xmobar/Plugins/Monitors/MPD.hs
index 0676e64..9525254 100644
--- a/src/Plugins/Monitors/MPD.hs
+++ b/src/Xmobar/Plugins/Monitors/MPD.hs
@@ -12,11 +12,11 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.MPD ( mpdConfig, runMPD, mpdWait, mpdReady ) where
+module Xmobar.Plugins.Monitors.MPD ( mpdConfig, runMPD, mpdWait, mpdReady ) where
 
 import Data.List
 import Data.Maybe (fromMaybe)
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 import System.Console.GetOpt
 import qualified Network.MPD as M
 import Control.Concurrent (threadDelay)
diff --git a/src/Plugins/Monitors/Mem.hs b/src/Xmobar/Plugins/Monitors/Mem.hs
index 403fa43..d69921b 100644
--- a/src/Plugins/Monitors/Mem.hs
+++ b/src/Xmobar/Plugins/Monitors/Mem.hs
@@ -12,9 +12,9 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.Mem (memConfig, runMem, totalMem, usedMem) where
+module Xmobar.Plugins.Monitors.Mem (memConfig, runMem, totalMem, usedMem) where
 
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 import qualified Data.Map as M
 import System.Console.GetOpt
 
diff --git a/src/Plugins/Monitors/Mpris.hs b/src/Xmobar/Plugins/Monitors/Mpris.hs
index ed76dc9..3556649 100644
--- a/src/Plugins/Monitors/Mpris.hs
+++ b/src/Xmobar/Plugins/Monitors/Mpris.hs
@@ -14,11 +14,11 @@
 --
 ----------------------------------------------------------------------------
 
-module Plugins.Monitors.Mpris ( mprisConfig, runMPRIS1, runMPRIS2 ) where
+module Xmobar.Plugins.Monitors.Mpris ( mprisConfig, runMPRIS1, runMPRIS2 ) where
 
 -- TODO: listen to signals
 
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 
 import Text.Printf (printf)
 
diff --git a/src/Plugins/Monitors/MultiCpu.hs b/src/Xmobar/Plugins/Monitors/MultiCpu.hs
index 1477cf6..3db3b5f 100644
--- a/src/Plugins/Monitors/MultiCpu.hs
+++ b/src/Xmobar/Plugins/Monitors/MultiCpu.hs
@@ -12,9 +12,9 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.MultiCpu (startMultiCpu) where
+module Xmobar.Plugins.Monitors.MultiCpu (startMultiCpu) where
 
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 import Control.Applicative ((<$>))
 import qualified Data.ByteString.Lazy.Char8 as B
 import Data.List (isPrefixOf, transpose, unfoldr)
diff --git a/src/Plugins/Monitors/Net.hs b/src/Xmobar/Plugins/Monitors/Net.hs
index 9819fe2..81a5f6b 100644
--- a/src/Plugins/Monitors/Net.hs
+++ b/src/Xmobar/Plugins/Monitors/Net.hs
@@ -13,12 +13,12 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.Net (
+module Xmobar.Plugins.Monitors.Net (
                         startNet
                       , startDynNet
                       ) where
 
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 
 import Data.Word (Word64)
 import Data.IORef (IORef, newIORef, readIORef, writeIORef)
diff --git a/src/Plugins/Monitors/Swap.hs b/src/Xmobar/Plugins/Monitors/Swap.hs
index b6c5019..fcaab84 100644
--- a/src/Plugins/Monitors/Swap.hs
+++ b/src/Xmobar/Plugins/Monitors/Swap.hs
@@ -12,9 +12,9 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.Swap where
+module Xmobar.Plugins.Monitors.Swap where
 
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 
 import qualified Data.ByteString.Lazy.Char8 as B
 
diff --git a/src/Plugins/Monitors/Thermal.hs b/src/Xmobar/Plugins/Monitors/Thermal.hs
index 5a97152..320ae17 100644
--- a/src/Plugins/Monitors/Thermal.hs
+++ b/src/Xmobar/Plugins/Monitors/Thermal.hs
@@ -12,10 +12,10 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.Thermal where
+module Xmobar.Plugins.Monitors.Thermal where
 
 import qualified Data.ByteString.Lazy.Char8 as B
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 import System.Posix.Files (fileExist)
 
 -- | Default thermal configuration.
diff --git a/src/Plugins/Monitors/ThermalZone.hs b/src/Xmobar/Plugins/Monitors/ThermalZone.hs
index a4744b4..bc46b59 100644
--- a/src/Plugins/Monitors/ThermalZone.hs
+++ b/src/Xmobar/Plugins/Monitors/ThermalZone.hs
@@ -15,9 +15,9 @@
 --
 ------------------------------------------------------------------------------
 
-module Plugins.Monitors.ThermalZone (thermalZoneConfig, runThermalZone) where
+module Xmobar.Plugins.Monitors.ThermalZone (thermalZoneConfig, runThermalZone) where
 
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 
 import System.Posix.Files (fileExist)
 import Control.Exception (IOException, catch)
diff --git a/src/Plugins/Monitors/Top.hs b/src/Xmobar/Plugins/Monitors/Top.hs
index 41a68b2..d6df249 100644
--- a/src/Plugins/Monitors/Top.hs
+++ b/src/Xmobar/Plugins/Monitors/Top.hs
@@ -15,9 +15,9 @@
 {-# LANGUAGE ForeignFunctionInterface #-}
 {-# LANGUAGE BangPatterns #-}
 
-module Plugins.Monitors.Top (startTop, topMemConfig, runTopMem) where
+module Xmobar.Plugins.Monitors.Top (startTop, topMemConfig, runTopMem) where
 
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 
 import Control.Exception (SomeException, handle)
 import Data.IORef (IORef, newIORef, readIORef, writeIORef)
diff --git a/src/Plugins/Monitors/UVMeter.hs b/src/Xmobar/Plugins/Monitors/UVMeter.hs
index 4d90846..079177f 100644
--- a/src/Plugins/Monitors/UVMeter.hs
+++ b/src/Xmobar/Plugins/Monitors/UVMeter.hs
@@ -13,9 +13,9 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.UVMeter where
+module Xmobar.Plugins.Monitors.UVMeter where
 
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 
 import qualified Control.Exception as CE
 import Network.HTTP.Conduit
diff --git a/src/Plugins/Monitors/Uptime.hs b/src/Xmobar/Plugins/Monitors/Uptime.hs
index 8524bcc..235fc85 100644
--- a/src/Plugins/Monitors/Uptime.hs
+++ b/src/Xmobar/Plugins/Monitors/Uptime.hs
@@ -15,9 +15,9 @@
 ------------------------------------------------------------------------------
 
 
-module Plugins.Monitors.Uptime (uptimeConfig, runUptime) where
+module Xmobar.Plugins.Monitors.Uptime (uptimeConfig, runUptime) where
 
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 
 import qualified Data.ByteString.Lazy.Char8 as B
 
diff --git a/src/Plugins/Monitors/Volume.hs b/src/Xmobar/Plugins/Monitors/Volume.hs
index 0023d41..1d3281c 100644
--- a/src/Plugins/Monitors/Volume.hs
+++ b/src/Xmobar/Plugins/Monitors/Volume.hs
@@ -1,7 +1,7 @@
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Plugins.Monitors.Volume
--- Copyright   :  (c) 2011, 2013, 2015 Thomas Tuegel
+-- Copyright   :  (c) 2011, 2013, 2015, 2018 Thomas Tuegel
 -- License     :  BSD-style (see LICENSE)
 --
 -- Maintainer  :  Jose A. Ortega Ruiz <jao@gnu.org>
@@ -12,7 +12,7 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.Volume
+module Xmobar.Plugins.Monitors.Volume
   ( runVolume
   , runVolumeWith
   , volumeConfig
@@ -24,7 +24,7 @@ module Plugins.Monitors.Volume
 import Control.Applicative ((<$>))
 import Control.Monad ( liftM2, liftM3, mplus )
 import Data.Traversable (sequenceA)
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 import Sound.ALSA.Mixer
 import qualified Sound.ALSA.Exception as AE
 import System.Console.GetOpt
diff --git a/src/Plugins/Monitors/Weather.hs b/src/Xmobar/Plugins/Monitors/Weather.hs
index cd1b4eb..cb5bf07 100644
--- a/src/Plugins/Monitors/Weather.hs
+++ b/src/Xmobar/Plugins/Monitors/Weather.hs
@@ -13,9 +13,9 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.Weather where
+module Xmobar.Plugins.Monitors.Weather where
 
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 
 import qualified Control.Exception as CE
 
diff --git a/src/Plugins/Monitors/Wireless.hs b/src/Xmobar/Plugins/Monitors/Wireless.hs
index 9397e50..545f6bc 100644
--- a/src/Plugins/Monitors/Wireless.hs
+++ b/src/Xmobar/Plugins/Monitors/Wireless.hs
@@ -12,11 +12,11 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.Monitors.Wireless (wirelessConfig, runWireless)  where
+module Xmobar.Plugins.Monitors.Wireless (wirelessConfig, runWireless)  where
 
 import System.Console.GetOpt
 
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 import Network.IWlib
 
 newtype WirelessOpts = WirelessOpts
diff --git a/src/Plugins/PipeReader.hs b/src/Xmobar/Plugins/PipeReader.hs
index b3e178d..7166163 100644
--- a/src/Plugins/PipeReader.hs
+++ b/src/Xmobar/Plugins/PipeReader.hs
@@ -12,11 +12,11 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.PipeReader where
+module Xmobar.Plugins.PipeReader where
 
 import System.IO
-import Plugins
-import Environment
+import Xmobar.Plugins
+import Xmobar.Environment
 import System.Posix.Files
 import Control.Concurrent(threadDelay)
 import Control.Exception
diff --git a/src/Plugins/StdinReader.hs b/src/Xmobar/Plugins/StdinReader.hs
index 31d041e..372e4f9 100644
--- a/src/Plugins/StdinReader.hs
+++ b/src/Xmobar/Plugins/StdinReader.hs
@@ -16,15 +16,15 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.StdinReader (StdinReader(..)) where
+module Xmobar.Plugins.StdinReader (StdinReader(..)) where
 
 import Prelude
 import System.Posix.Process
 import System.Exit
 import System.IO
 import Control.Exception (SomeException(..), handle)
-import Plugins
-import Actions (stripActions)
+import Xmobar.Plugins
+import Xmobar.Actions (stripActions)
 
 data StdinReader = StdinReader | UnsafeStdinReader
   deriving (Read, Show)
diff --git a/src/Plugins/Utils.hs b/src/Xmobar/Plugins/Utils.hs
index bbfa84f..6546c15 100644
--- a/src/Plugins/Utils.hs
+++ b/src/Xmobar/Plugins/Utils.hs
@@ -15,7 +15,7 @@
 ------------------------------------------------------------------------------
 
 
-module Plugins.Utils (expandHome, changeLoop, safeHead) where
+module Xmobar.Plugins.Utils (expandHome, changeLoop, safeHead) where
 
 import Control.Monad
 import Control.Concurrent.STM
diff --git a/src/Plugins/XMonadLog.hs b/src/Xmobar/Plugins/XMonadLog.hs
index 158b7ef..6bbba59 100644
--- a/src/Plugins/XMonadLog.hs
+++ b/src/Xmobar/Plugins/XMonadLog.hs
@@ -15,20 +15,20 @@
 --
 -----------------------------------------------------------------------------
 
-module Plugins.XMonadLog (XMonadLog(..)) where
+module Xmobar.Plugins.XMonadLog (XMonadLog(..)) where
 
 import Control.Monad
 import Graphics.X11
 import Graphics.X11.Xlib.Extras
-import Plugins
+import Xmobar.Plugins
 #ifdef UTF8
 #undef UTF8
 import Codec.Binary.UTF8.String as UTF8
 #define UTF8
 #endif
 import Foreign.C (CChar)
-import XUtil (nextEvent')
-import Actions (stripActions)
+import Xmobar.XUtil (nextEvent')
+import Xmobar.Actions (stripActions)
 
 data XMonadLog = XMonadLog
                | UnsafeXMonadLog
diff --git a/src/Runnable.hs b/src/Xmobar/Runnable.hs
index 04272f5..164f661 100644
--- a/src/Runnable.hs
+++ b/src/Xmobar/Runnable.hs
@@ -19,12 +19,12 @@
 --
 -----------------------------------------------------------------------------
 
-module Runnable where
+module Xmobar.Runnable where
 
 import Control.Monad
 import Text.Read
-import Config (runnableTypes)
-import Commands
+import Xmobar.Config (runnableTypes)
+import Xmobar.Commands
 
 data Runnable = forall r . (Exec r, Read r, Show r) => Run r
 
diff --git a/src/Runnable.hs-boot b/src/Xmobar/Runnable.hs-boot
index eba90e6..0f67322 100644
--- a/src/Runnable.hs-boot
+++ b/src/Xmobar/Runnable.hs-boot
@@ -1,6 +1,6 @@
 {-# LANGUAGE ExistentialQuantification  #-}
-module Runnable where
-import Commands
+module Xmobar.Runnable where
+import Xmobar.Commands
 
 data Runnable = forall r . (Exec r,Read r,Show r) => Run r
 
diff --git a/src/Signal.hs b/src/Xmobar/Signal.hs
index 74e40e9..bdc4be1 100644
--- a/src/Signal.hs
+++ b/src/Xmobar/Signal.hs
@@ -16,7 +16,7 @@
 --
 -----------------------------------------------------------------------------
 
-module Signal where
+module Xmobar.Signal where
 
 import Data.Foldable (for_)
 import Data.Typeable (Typeable)
@@ -33,7 +33,7 @@ import DBus (IsVariant(..))
 import Control.Monad ((>=>))
 #endif
 
-import Plugins.Utils (safeHead)
+import Xmobar.Plugins.Utils (safeHead)
 
 data WakeUp = WakeUp deriving (Show,Typeable)
 instance Exception WakeUp
diff --git a/src/StatFS.hsc b/src/Xmobar/StatFS.hsc
index a9046c1..25de0df 100644
--- a/src/StatFS.hsc
+++ b/src/Xmobar/StatFS.hsc
@@ -15,7 +15,7 @@
 {-# LANGUAGE CPP, ForeignFunctionInterface, EmptyDataDecls #-}
 
 
-module StatFS ( FileSystemStats(..), getFileSystemStats ) where
+module Xmobar.StatFS ( FileSystemStats(..), getFileSystemStats ) where
 
 import Foreign
 import Foreign.C.Types
diff --git a/src/Window.hs b/src/Xmobar/Window.hs
index 829ab8d..c8228de 100644
--- a/src/Window.hs
+++ b/src/Xmobar/Window.hs
@@ -13,7 +13,7 @@
 --
 -----------------------------------------------------------------------------
 
-module Window where
+module Xmobar.Window where
 
 import Prelude
 import Control.Applicative ((<$>))
@@ -28,8 +28,8 @@ import Data.List (maximumBy)
 import Data.Maybe (fromMaybe)
 import System.Posix.Process (getProcessID)
 
-import Config
-import XUtil
+import Xmobar.Config
+import Xmobar.XUtil
 
 -- $window
 
diff --git a/src/XPMFile.hsc b/src/Xmobar/XPMFile.hsc
index f10449b..03d534f 100644
--- a/src/XPMFile.hsc
+++ b/src/Xmobar/XPMFile.hsc
@@ -11,7 +11,7 @@
 --
 -----------------------------------------------------------------------------
 
-module XPMFile(readXPMFile) where
+module Xmobar.XPMFile(readXPMFile) where
 
 #if MIN_VERSION_mtl(2, 2, 1)
 import Control.Monad.Except(MonadError(..))
diff --git a/src/XUtil.hsc b/src/Xmobar/XUtil.hsc
index dcca342..05e6fad 100644
--- a/src/XUtil.hsc
+++ b/src/Xmobar/XUtil.hsc
@@ -11,7 +11,7 @@
 --
 -----------------------------------------------------------------------------
 
-module XUtil
+module Xmobar.XUtil
     ( XFont
     , initFont
     , initCoreFont
@@ -48,11 +48,11 @@ import qualified System.IO as UTF8 (readFile,hGetLine)
 # endif
 #endif
 #if defined XFT
-import MinXft
+import Xmobar.MinXft
 import Graphics.X11.Xrender
 #endif
 
-import ColorCache
+import Xmobar.ColorCache
 
 readFileSafe :: FilePath -> IO String
 #if defined XFT || defined UTF8
diff --git a/test/Plugins/Monitors/CommonSpec.hs b/test/Plugins/Monitors/CommonSpec.hs
index 847368c..ee1a5bc 100644
--- a/test/Plugins/Monitors/CommonSpec.hs
+++ b/test/Plugins/Monitors/CommonSpec.hs
@@ -4,7 +4,7 @@ module Plugins.Monitors.CommonSpec
   ) where
 
 import Test.Hspec
-import Plugins.Monitors.Common
+import Xmobar.Plugins.Monitors.Common
 
 main :: IO ()
 main = hspec spec