From ecd0ee3bc6a46e563dde183317cc8a0b596957a7 Mon Sep 17 00:00:00 2001 From: Spencer Janssen Date: Mon, 19 Nov 2007 04:06:58 +0100 Subject: Trailing space darcs-hash:20071119030658-a5988-696782fc7b3bee7df0b4c6b3065d46e3260c8d26.gz --- XMonad/Core.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/XMonad/Core.hs b/XMonad/Core.hs index 27ef4f2..4990311 100644 --- a/XMonad/Core.hs +++ b/XMonad/Core.hs @@ -317,7 +317,7 @@ recompile = liftIO $ do yes <- doesFileExist src when yes $ do srcT <- getModificationTime src - binT <- catch (getModificationTime bin) (const $ return srcT) -- needs recompiling + binT <- catch (getModificationTime bin) (const $ return srcT) -- needs recompiling when (srcT >= binT) $ do status <- bracket (openFile err WriteMode) hClose $ \h -> do waitForProcess =<< runProcess "ghc" ["--make", "xmonad.hs", "-i", "-v0"] (Just dir) -- cgit v1.2.3