aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad
diff options
context:
space:
mode:
authorAdam Vogt <vogt.adam@gmail.com>2011-06-09 06:24:24 +0200
committerAdam Vogt <vogt.adam@gmail.com>2011-06-09 06:24:24 +0200
commit2c48411000176651bdb6793ad7c3793ff0a01b37 (patch)
treef6589f2182fe29e53af31f013b6d255061b033c3 /XMonad
parent3dbd75e97362fdc262947bd55d247863ab2b3c5c (diff)
downloadxmonad-2c48411000176651bdb6793ad7c3793ff0a01b37.tar.gz
xmonad-2c48411000176651bdb6793ad7c3793ff0a01b37.tar.xz
xmonad-2c48411000176651bdb6793ad7c3793ff0a01b37.zip
Break a long line
Ignore-this: 5f4c8907066e1ea5df3f384a34951402 darcs-hash:20110609042424-1499c-bc1a04152e8f19d14d01604144b9d202affcc660.gz
Diffstat (limited to 'XMonad')
-rw-r--r--XMonad/Core.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/XMonad/Core.hs b/XMonad/Core.hs
index 8ec0000..5fe8688 100644
--- a/XMonad/Core.hs
+++ b/XMonad/Core.hs
@@ -464,7 +464,8 @@ recompile force = io $ do
ghcErr <- readFile err
let msg = unlines $
["Error detected while loading xmonad configuration file: " ++ src]
- ++ lines (if (null ghcErr) then show status else ghcErr) ++ ["","Please check the file for errors."]
+ ++ lines (if null ghcErr then show status else ghcErr)
+ ++ ["","Please check the file for errors."]
-- nb, the ordering of printing, then forking, is crucial due to
-- lazy evaluation
hPutStrLn stderr msg