diff options
| -rw-r--r-- | XMonad/Config/Arossato.hs | 1 | ||||
| -rw-r--r-- | XMonad/Hooks/DynamicLog.hs | 2 | ||||
| -rw-r--r-- | XMonad/Util/Run.hs | 4 |
3 files changed, 5 insertions, 2 deletions
diff --git a/XMonad/Config/Arossato.hs b/XMonad/Config/Arossato.hs index 48b33e9..a30bb09 100644 --- a/XMonad/Config/Arossato.hs +++ b/XMonad/Config/Arossato.hs @@ -20,7 +20,6 @@ module XMonad.Config.Arossato ) where import qualified Data.Map as M -import System.IO (hPutStrLn) import XMonad hiding ( (|||) ) import qualified XMonad.StackSet as W diff --git a/XMonad/Hooks/DynamicLog.hs b/XMonad/Hooks/DynamicLog.hs index 9dec934..ecfc807 100644 --- a/XMonad/Hooks/DynamicLog.hs +++ b/XMonad/Hooks/DynamicLog.hs @@ -101,6 +101,8 @@ import XMonad.Hooks.UrgencyHook -- appropriately, either by putting it in your @.xsession@ or similar -- file, or by using @spawnPipe@ in your @main@ function, for example: -- +-- > import XMonad.Util.Run -- for spawnPipe and hPutStrLn +-- > -- > main = do -- > h <- spawnPipe "xmobar -options -foo -bar" -- > xmonad $ defaultConfig { diff --git a/XMonad/Util/Run.hs b/XMonad/Util/Run.hs index 3c5fb0c..f077629 100644 --- a/XMonad/Util/Run.hs +++ b/XMonad/Util/Run.hs @@ -25,7 +25,9 @@ module XMonad.Util.Run ( runInTerm, safeRunInTerm, seconds, - spawnPipe + spawnPipe, + + hPutStr, hPutStrLn -- re-export for convenience ) where import System.Posix.IO |