From 62951855f589ba5d27167c7b556dd291d63e2213 Mon Sep 17 00:00:00 2001
From: Adam Vogt <vogt.adam@gmail.com>
Date: Thu, 9 Jun 2011 06:24:24 +0200
Subject: Break a long line

Ignore-this: 5f4c8907066e1ea5df3f384a34951402

darcs-hash:20110609042424-1499c-bc1a04152e8f19d14d01604144b9d202affcc660
---
 XMonad/Core.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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
-- 
cgit v1.2.3