From f34642cbac13c1ff49dcbaefc1cc6cccf37b9ef5 Mon Sep 17 00:00:00 2001 From: Adam Vogt Date: Thu, 9 Jun 2011 04:24:24 +0000 Subject: [PATCH] Break a long line --- 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